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Figure 4.12 The thirty-nine 2-homohedral tilings. 


Once while doing the above simulations I came across an interesting batch of the 44[34]72[3" Ju 
2-homohedral tiling where the percolations forward and backward in time gave the same value of 
Pc, that is there is an approximate time symmetry. In other words the p;’s of both the first and 
the second population are symmetric to each other. Each percolates when its population reaches 
756 out of the combined total of 1070, which identically gives p. = 0.7065. Large non-percolating 
clusters quickly disappears after the onset of percolation as shown in Figure 4.13. In Figure 4.13 
(b) the size of the second largest cluster is reduced to one between the population II of 941 and 961, 
which correspond to the density of 0.8794 and 0.8981 respectively. Interestingly from the population 
of 961 until 1070 there is only one cluster despite the fact that there are still more than one hundred 
population I. Here population IT always refers to any population which percolates or which is being 
observed with regard to percolation. On the other hand in Figure 4.13 (b) the second biggest cluster 
is the smallest cluster from population 898 to 1037. Again from the population of 1038 until the 
maximum 1070 no second clusters appear. 
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Figure 4.13 The biggest, the second biggest, and the smallest cluster from a batch of the 
44[3*]72[3" |i, 2-homohedral tiling where the percolation happens to be symmetry in time, that is 
(a) and (b) are time symmetric to each other. The vertical dotted line is where the percolation 
point occurs in each case. The the heaviest to the lightest lines are respectively the progression 
of the clusters which are biggest, second biggest, and smallest at each population density. 


The percolation considered is that which percolates from the lower bound to the upper bound, 
both of which are fixed. Because the networks must be constructed such that there would be 
duplicates of neither vertices nor links, there must be cells some vertices and edges of which belong 
to one or more of the basic tiles adjacent to them. As a result, those basic tiles on the boundary 
sometimes have a few of their cells missing, and depending on whether the basic tile in question is 
very complex or simple the position of the missing cell may merely lie on its boundary or may lie 
nearly halfway into its interior as is the case with the 43[34]83[3°]: and the 43[3]83[3°]n1_ tilings. 
The upper and the lower boundaries, which decide the percolation, are chosen as straight lines 
parallel to the vertical axis and lying in the direction towards the interior of the network and at a 
fixed distance from the the maximum and the minimum horizontal positions respectively of all the 
vertices in the network. This fixed distance is defined for each network to be a fixed ratio of its 
overall width. The value of 0.05 had been used which was later changed to 0.1 due to a problem 
which occured while simulating the 42[3*]82[3°] tessellation, missing cells formed a continuous band 
disconnecting all the cells on the boundary from the rest of the network, the upper boundary lay 
within this band when shifted by five percent from the upper limit but not when shifted by ten 
percent. 


The tilings in Figure 4.13 have the basic units shown in Figure 4.14. 
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Figure 4.14 The unit cells of the 2-homohedral tilings. 


In Table 4.7 there are six types of percolation probabilities. Two cells can be neighbours to 
each other under the criterion of having either one or two vertices in common. This gives rise to two 
different values of p,’s for cells, and another two for bonds. These can be termed 1-neighbours and 
2-neighbours respectively. In Physics and other physical sciences 2-neighbours are more important 
because the greater the contact area is the stronger the bonding. This is not always the case in other 
fields, for example in Sociology a smaller point of contact sometimes implies the less duplications 
of neighbours’ neighbours, and thus the larger the resultant networks. Because there is a cost for 
maintaining the connections, the smaller each contact point is and the larger the network the better, 
therefore here 1-neighbours seem to be more important. 


33[3°]71 [37] 


Cell Bond cell bond vertex edge 
0.47140.0667 0.30410.0272 0.72120.0444 0.6771£0.0381 
1.1551 x 10-6 —3.3740 x 1076 —1.1124x10—-4 


4.0885 x 10-5 1.1316x 10-6 1.9314x10—5 


12[1099 
10.4149 


33[37]93[3? 1 
Cell Bond cell bond vertex edge 
0.4966=C0.0655 0.2734 0.0206 0.504270.0574 0.3119=-0.0417 0.7628=-0.0228 0.7094 =-0.0435 
—8.2288x10—5 —5.5513x10—6 —1.0585x10—4 4,.8211x10—5 1.0042x 10-6 —2.7590x10—5 
3.7765x 10-5 5.9281x10—7 2.1108x10—5 7.5982x 10-6 7.3299x 10-7 7.7345 x 10-6 
2[139],] [6[831], 6[1138] ][2[305], 6 [412] 2[771],  6[1054] : 2[467], 
5.1942 12.0144 12.1564 5.0557 5.1165 11.0298 11.1556 % 3.7859 
6[412] 6[1322] 
4 8 
44[3*]84[3°] 
Cell Bond cell bond vertex edge 
0.4695-=50.0858 0.304420.0429 0.7194=20.0209 0.640720.0296 
—3.5574x10—5 2.8967x 10-5 —5.8481x10—6 2.8990x 10-6 
1.4884x 10-4 6.8367 x 10-6 6.5739 x10—7 2.0123x 10-6 


4[748],  12[888] 
10.5294 10.5946 
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33[3°]82[3°] 
Cell Bond cell bond vertex edge 
0.4903-£0.1015 0.292600.0281 0.74470.0329 0.7019=L0.0270 
1.2205 x 10-4 —1.8541x10—5 2.1925 x10—-7 — 6.4679 x10—6 
2.1262 x 10-4 1.9682x 10-6 2.8427 x10—6 8.9933x 10-7 
4812],  12[1313] 
11.0788 11.2749 
33[37]93[3° |i 
Cell Bond cell bond vertex edge 
0.4607 =50.0586 0.2483=00.0258 0.7482=-0.0264 0.7049=50.0195 
7.9409 x10—5 4.8742x 10-6 2.4849 x10—6 —1.0461x10—5 
3.3840 x10—5 7.4553x10—7 1.2161 x10—6 1.0354x10—6 
4[957], 12[1188] 
12.0878 12.1785, 3.6620 
6[1395] 
3.8480 
4 1 
43[34]10¢[3!"]1 
Cell Bond cell bond vertex edge 
0.5286=50.0511 0.2991-50.0319 0.7789=L0.0386 0.7173=20.0391 
5.4350 x 10-5 —8.0790 x 1076 8.7871 x10—§ —1.2114x1074 
1.7402 x10—5 2.7687 x 10-6 4.7653 x10—6 1.8197x 10-5 
4/803] , 
11.5691 
33[37]93[3"]1 
Cell Bond cell bond vertex edge 
0.5206=50.0551 0.2987=0.0308 0.7532=-0.0296 0.7063=20.0222 
—9.0646x 10-6 7.4580x 10-6 —8.9673 x10—6 —4.5643 x10—6 
1.7837 x 10-5 1.7780x 10-6 1.3152 x 10-6 7.3255x 10-7 
45[34]104[3"9] 

Cell Bond cell bond vertex edge 
0.4726-20.0684 0.290500.0633 0.7341-0.0316 0.6957 0.0303 
1.0814x 1074 5.5163x10—4 —8.0603 x 107 § 7.5952x10—7 
8.0038 x 10-5 1.3835x 10-4 2.0508 x10—6 1.6121x 10-6 

4[1537], 
11.6695 
4 1 
43[3°]106[3 ln 
Cell Bond cell bond vertex edge 
0.4958=50.0796 0.3020=£0.0381 0.7490=-0.0461 0.6751-£0.0199 
1.3909 x 10-4 3.9193x10—5 1.0834x 10-4 6.2752x 10-7 
8.0344x10—5 6.3920x 10-6 1.4492x10—5 3.7299x 10-7 
4 
45[3*]82[3%] 

Cell Bond cell bond vertex edge 
0.5102=50.0568 0.3183=20.0405 0.7202-0.0493 0.6953=0.0307 
4.1767x10—5 —9.0691x10—6 —1.1640x10—4 1.5917x10—5 
3.0853 x 10-5 7.8890x 10-6 2.1475 x10—5 1.8233 x 10—6 

4[1040], 
10.5096 
4 
43[3*]83[3°]1 
Cell Bond cell bond vertex edge 


0.4577L0.0761 
—2.5782x10—5 
8.4655 x 10-5 


0.291020.0421 
—1.6419x10—5 
7.8109x10—6 
4/978] , 
10.5562 


0.6887=£0.0279 
8.0593 x10—7 
7.8808 X10—7 


0.653250.0340 
— 2.5506 x10—5 
3.2110x 10-6 
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4 
43[3*]83[33]11 
Cell Bond cell bond vertex edge 
0.5030=£0.0603 0.3166=20.0334 0.7385=20.0255 0.6718=20.0369 
2.6397x10—5 —1.3936x10—5 —2.6605 x10—6 1.8952x 10-6 
4.0377x10—5 2.7675x 10-6 9.6100 x10—7 3.1533x 10-6 
4[1152], 
10.5799 
4 
43[34]83[3°]in 
Cell Bond cell bond vertex edge 
0.4931=20.0560 0.2927=0.0320 0.729420.0348 0.6730=20.0289 
1.5620 x 1074 3.0191 x1075 4.5084 x10—6 —2.7067x 1075 
3.1433 x1075 6.4721 x 10-6 2.5226 x10—6 3.4615x10—6 
4 
44[34]72[3 In 
Cell Bond cell bond vertex edge 
0.4761=20.0432 0.3174=20.0396 0.71445-0.0228 0.6440=50.0371 
—7.3074x1075 3.7498x10—5 7.2116x10—6 2.2191x1075 
9.5057 x 10-6 6.2114x 10-6 6.1119x10—7 3.8797x 10-6 
8[345], 12[486] |/8[961],  12[1370] 4[767],  12[1063]] [4[1070], 12[1500] 
5.5710 5.6379 10.0208 10.1241 2.7901 2.8222 3.8579 3.8800 
33[3°]126[377] 
Cell Bond cell bond vertex edge 
0.50770.0896 0.2640-£0.0333 0.827320.0209 0.726900.0313 
4.5180x10—4 2.5513x10—6 1.3947 x10—5 — 2.2183 x 10-6 
3.2202 x 10-4 3.2552x 10-6 1.6592 x 10-6 1.6715x 10-6 
12[1343] 6[1133] 6[1638] 
4 
44[3*]72[3"]r 
Cell Bond cell bond vertex edge 
0.477420.0624 0.3140=20.0390 0.7305=-0.0263 0.6504=20.0349 
—1.6958x 10-4 3.5112x10—5 7.4362 x10—6 1.7310x 1075 
4.8309 x10—5 9.6223x 10-6 1.0424 x 10-6 3.0145x 10-6 
8[403], 12[554] | [8[1100], 12/1534] 4[1050],  6[1421]] |4[1296], — 6[1764] 
5.4591 5.5379 10.0236 10.1213 2.4686 2.4828 | [3.8704 3.8889 
54[3°}74[3" 1 
Cell Bond cell bond vertex edge 
0.5112=50.0412 0.3406-L0.0207 0.7029=0.0507 0.6645-20.0300 
—5.3542x10—5 2.1641 x10-6 —5.7814x10—5 9.3355x 10-6 
8.4833 x 10-6 5.0113x10—7 1.4169 x10—5 1.5205x 1076 
31[4°]51 [4° ]1 
Cell Bond cell bond vertex edge 
0.4003=20.0534 0.2368=-0.0198 0.5786=20.0400 0.4595=-0.0398 0.6184=20.0356 0.5109=L0.0531 


—1.4626 x 1075 
1.5617x 1075 


4[508] , 6795] 
7.37kk01 7.4943 
Cell 


0.4065-50.0646 
— 9.8055 x 1075 
3.7012x10—5 


4[512], 6648] 
7.6328 7.6728 
Cell 


0.4631=20.0471 


—5.2284 x 10-8 
3.5502x 1077 


4[1872],  6[2979] | [4[508), 
14.1731 14.3411 3.7835 
Bond cell 
0.2309=00.0241 0.589821 


3.9800x 1075 
5.2273x 10-6 


6795] | [4[961], 
3.8264 6.1748 
31 [47]51 [4°] 
bond 
0.0633 0.43944 


2.2560x 10-6 


6.6307x10—7 3.3297 
4[1954],  6[2486] | [4[512], 
14.2027 14.2912 3.8750 

Bond cell 
0.3164-20.0255 

x10—-6 

x10—-6 


41906], 
10.1815 


—1.8568x10—6 


—2.9462x 107-5 
5.1123x10—6 


6[1521] 
6.2406 


x10—-5 
61648] | [4[992], 
3.8889 6.2016 
53[3°]86[3°] 
bond 


C0.0536 


—1.3300x 10-4 
3.6224x10—5 


6[1260] 
6.2349 


—1.2175x10—6 
2.6728x 10-6 


4[569],  6[871] 
3.5993 3.6739 
vertex 


0.6423=-0.0381 
—5.1659x10—5 
7.7919x10—6 


4[545],  6[685] 
3.7578 3.7839 
vertex 


0.6800=20.0384 
—9.9185x10—6 
4.4523 x10—6 


2.0112x10—5 
1.7919x 1075 


4[1024],  6[1600] 
5.6738 5.7387 
edge 


0.5049=-0.0271 
—9.8556 x 10-7 
8.8048x10—7 


4[1024],  6[1296] 
5.8145 5.8349 
edge 


0.6587 20.0246 
1.5506 x 10—6 
6.3039x 10-7 
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53[3°]86 [3°] 
Cell Bond cell bond vertex edge 
0.5052-20.0474 0.3211=20.0274 0.7145=20.0299 0.6469=20.0242 
—1.6178x10—6 —9.4980 x 10-6 8.1493 x10-6 —1.0841x10—5 
1.0710x10—5 2.4172x 10-6 1.7096 x 10-6 7.2095x 10-7 
8[351],  12[814] |/8[971], 12/2316] 4[804],  6[1782] | [4[1144], 62580] 
5.5328 5.6904 10.0062 10.2366 2.8458 2.8956 3.8531 3.9023 
52[3°]1212[377] 
Cell Bond cell bond vertex edge 
0.4897=20.0718 0.3037=20.0257 0.7384=20.0258 0.6694 20.0297 
—1.4823x10—4 —1.3145x10—-5 3.3765 x10—6 1.5898x 10-5 
1.0656 x 10-4 1.4342x 10-6 8.4513x10—7 2.4608x 10-6 
8[1457], 
11.2972 
54[3°]74[37 ln 
Cell Bond cell bond vertex edge 
0.5001=20.0342 0.3327=20.0329 0.6973=L0.0235 0.6688=5 0.0303 
1.7585 x 10-5 4.4678x10—5 —7.2307x10—6 2.4051x10—5 
3.4856 x 10-6 5.2573x 10-6 5.9288 x10—7 2.0921x 10-6 
8[371],  12[541) | [8[1027], 12[1519] 4[835],  6[1194] | [4[1195], 6[1722] 
5.5364 5.6155 9.7254 9.8328 2.8623 2.8844 3.8661 3.8885 
53[3°]86 [3°] 
Cell Bond cell bond vertex edge 
0.4867-20.0459 0.32650.0237 0.7108=20.0200 0.6720=20.0294 
—1.0891x 10-4 —3.7362x10—6 2.8929 x10—6 6.2044x 10-6 
3.3218x10—5 7.9808x10—7 4,2792x10—7 3.1424x 10-6 
4>[3*]12¢[3?7] 
Cell Bond cell bond vertex edge 
0.51170.0960 0.26370.0295 0.7861=00.0215 0.727300.0227 
1.0580 x 10-4 —4.6675 x 10-6 7.1685 x10—6 1.1750x 10-6 
2.1578x10—4 1.9508x 10-6 4.3496 x10—7 7.1142x10-7 
4,[34]1812[343] 
Cell Bond cell bond vertex edge 
0.5249-50.1168 0.2493-0.0632 0.8497 20.0234 0.7743=20.0483 
1.1603 x 10-3 7.1820x10—4 5.2173 x10—6 8.6384x 10-5 
6.1479x 10-4 2.0594x 1074 6.1183x10—7 1.2578x10—5 
5 7 
53[3°]73[3"]1 
Cell Bond cell bond vertex edge 
0.4882-0.0494 0.333500.0310 0.7149=00.0273 0.6495=20.0278 
—4.4634x10—5 —1.2425x10—5 1.6306 x 10-6 5.9525x 10-6 
1.5462 x 1075 2.4243x10—6 9.8464x10—7 1.4733x 1076 
4[170],  4[399] 4[455], 4[1112] 2[413],  2[907] 2[574],  2[1293] 
5.3529 5.5739 9.4110 9.7392 2.7797 2.8512 3.8084 3.8716 
53[3°]73[3"]n 
Cell Bond cell bond vertex edge 
0.4345-20.0489 0.293000.0243 0.4785=00.0354 0.3239=L0.0187 0.6900=L0.0283 0.6421=-0.0289 
8.3482x10—5 —9.3058x 10-6 4.7566x10—5 —4.1986x10—6 —7.8267x10—6 3.4481x10—6 
4.0009x 10-5 1.1454x 10-6 7.5326x 10-6 3.8717x10—7 1.5860x 10-6 1.8973x 10-6 


[161] 


6[1670] 


9.8137 11.3257 
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32[47]52[4°]1 


Cell 


0.4099-0.0264 
4.7650x 10-6 
1.0783x 10-6 


Cell 


0.4322-50.0512 
5.8373x10—5 
1.9444 x 10-5 


Bond 


0.2271=00.0154 
2.1524x 10-6 
1.2777x 10-7 


2[1407],  6[1863 
14.0640 14.1857 
Bond 


0.2344250.0171 
—1.5204x 10-6 
2.2157x10—7 


cell 


0.56870.0469 
2.6238x10—5 
8.5056x 10-6 


bond 


0.502820.0283 
1.1978x 10-5 
1.1260x 10-6 


32 [43]52 [4°] 


cell 


0.563820.0590 
4,.8226x10—6 
1.5253x10—5 


bond 


0.4749=£0.0440 
—5.1510x10—5 
1.0399x 10-5 


vertex 


0.6228=-0.0346 
—1.1730x10—5 
5.5785x 10-6 


vertex 


0.6260=£0.0368 
—2.9282x10—5 
6.7165x 10-6 


edge 


0.5022=-0.0343 
3.4916x10—5 
3.2050x 10-6 


edge 


0.5468=£0.0270 
8.1058x 10-6 
1.6103x 10-6 


2[1831], 
14.1038 


[2927] 
14.2890 


Cell 


0.5029-F0.0759 
8.6335 x 10—§ 
1.4737x10—4 


Cell 


0.4339=50.0259 
4.6901x 10-7 
6.9917x10—7 


Bond 


0.25040.0233 
—3.9666x 1076 
8.6134x10—7 

2[1139],  6[1743 

13.8191 14.0425 


Bond 


0.2335=£0.0200 
—3.2315x10—6 
3.6617xX10—7 


33[43]53[4°] 


cell 


0.623820.0601 
—1.3226x 1074 
3.8526x10—5 


bond 


0.5029=£0.0359 
1.1319x 1074 
1.9717x10—5 


31 [47]62[4°]1 
bond 


cell 


0.54680.0321 
3.4990x10—5 
4,5289x 10-6 


0.4235=-0.0152 
2.5190x 10-6 
1.5119x10—7 


vertex 


0.6645=-0.0414 
1.1038x 107-4 
1.6270x10—5 


vertex 


0.6418=£0.0638 
—1.1180x10—4 
4.6849x 10-5 


edge 


0.5801=20.0306 
—3.3375x1075 
3.6510x 10-6 


edge 


0.5715-0.0431 
4.9165x10—5 
7.7330x 10-6 


2[760],  6[1190] | |2[2860], 6[4534]] [2[760], 6[1190] | 2[1457], 6[2301] | 2[833], 6[1281] | [21536], 6[2400] 

7.5263 7.6202 15.2503 15.4027 3.8342 3.8672 6.7138 6.7718 3.6879 3.7471 5.7513 5.8008 
31[47]62[4%}n 

Cell Bond cell bond vertex edge 


0.4740=50.0681 
—1.5376x10—5 
4.0570x 10-5 


Cell 


0.4540-50.0687 
7.8079x10—5 
4.6624x10—5 


Cell 


0.4042--0.0580 
3.6150x10—5 
1.8890x 10-5 


Cell 


0.4525-50.0780 
7.1913x10—4 
1.4678x10—4 


0.2803=20.0276 
—1.1319x10—5 
1.3703x 10-6 


2[1742], 6[2656 
14.8576 15.0715 
Bond 


0.2265-£0.0369 
—1.5535x 1075 
2.8752x 10-6 


2[1605],  6[2026 
14.9533 15.0642 
Bond 


0.2281+0.0277 
2.6810x 10-6 
7.5233x10—7 


2(1782],  6[2418] 
14.8911 15.0488 
Bond 


0.2122-F0.0230 
—9.6553x 10-6 
8.2295x10—7 


0.6333=00.0534 
—1.4476x10—4 
2.7149x10—5 


0.4785=-0.0260 
1.8163x 10-5 
1.3662x 10-6 


32[47]64[4°] 


cell 


0.616020.0685 
—1.8755x10—4 
5.5163x10—5 


bond 


0.4908=£0.0346 
—1.2315x10—5 
2.5752x 10-6 


33[47]66 [4°] 


cell 


0.59580.0567 
—4.2796x10—5 
1.4656x 10-5 


bond 


0.4698=£0.0313 
3.1642x10—5 
4.6775x 10-6 


31[4°]84 [49] 


cell 


0.52370.0627 
—1.0143x10—5 
3.2798x10—5 


bond 


0.3807=20.0401 
3.5308x 10-6 
5.4378x 10-6 


0.6961 20.0552 
2.5890x 10-5 
2.2393x10—5 


vertex 


0.6320=£0.0532 
1.0557x 10-4 
2.0627x10—5 


vertex 


0.6353=20.0449 
—2.0589x10—5 
8.7591x10—6 


vertex 


0.7010=£0.0470 
—7.5034x10—5 
1.2495x10—5 


0.6132-0.0465 
6.0868x 10-5 
1.1922x 10-5 


edge 


0.5527=-0.0434 
1.0264 x 10-5 
1.0088 x 10-5 


edge 


0.5210=£0.0370 
7.9238x 10-6 
2.4104x 10-6 


edge 


0.6086=20.0679 
1.6014x 10-4 
3.8208x10—5 


2[1794], 
16.9197 


6[2632] 
17.1071 
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31[57)42[54]1 


Cell 


0.404720.0637 
6.1235x10—5 
3.1306x10—5 


Cell 


0.3457=5 0.0484 
8.5340x10—5 
2.5074x10—5 


Bond 


0.218520.0212 
5.5289x 10-6 
5.4838x 10-7 

2(2374],  6[3273] 

16.0126 16.1577 


Bond 


0.1820=-0.0200 
—5.3816x10—6 
6.0154x10—7 


cell 


0.618020.0491 
6.5660x10—5 
1.1080x 10-5 


2/252], 


2[570], 


bond 


0.4930-0.0327 
1.4895x 10-5 
2.1733x 10-6 


3115940154) 


cell 


0.6226=20.0443 
—5.2469x10—5 
1.2122x10—5 


bond 


0.5695-20.0477 
—1.2139x10—4 
1.8902x10—5 


vertex 


0.5516=20.0469 
4.3305x10—5 
1.3841x 10-5 


vertex 


0.5527 =20.0393 
—2.9005x10—5 
1.0732x10—5 


edge 


0.4101=20.0301 
1.2816x 10-5 
2.1196x 10-6 


edge 


0.4162=20.0419 
—3.2254x10—5 
7.5538x 10-6 


Cell 


0.367200.0405 
— 6.6453 x10—5 


Bond 


0.1766=00.0243 
—3.2608x 10-6 


30153 ]44 [54 


cell 


0.6265=20.0398 
7.1192x10—-5 
7.0957 x 10-6 


bond 


0.5822-50.0505 
2.3922x10—5 
2.8516x10—5 


vertex 


0.5413=20.0515 
—9.8715x10—5 
1.9319x 1075 


edge 


0.410120.0536 
9.3126x10—5 
3.1517x1075 


1.0035x10—§ 
2[1212], 


1.1174x1075 


from top to bottom, mean + standard deviation, second moment, and third moment. Similarly 
each of the items in each box contains the number of runs [the number of network components] 
and the coordination number. 


The advantage of sparse- over dense networks described by Burt (1992) is an idea similar to 
that of the benefit of decentralisation and local autonomy in politics. According to him, size still 
matters but the cost of maintaining the size is also important. The idea can be very general; dense 
networks are virtually worthless monitoring devices, while sparse networks give more information 
benefits. Taking opportunity costs into account, the rate of return of a dense network is lower than 
that of a sparse network. The idea can be applied to a strategic network expansion which is crucial 
for sales persons and jobs hunting alike. 

Something similar to this comes up in a variety of fields. In Sociology it is sometimes called 
the strength of weak ties. A tie between two things is weaker the less each of them has in common 
with the other. It is well known, #.e. the origin unknown, that best friends are usually those who 
have least in common with each other. It would be interesting to trace this idea back to where it 
first appeared in literature. 

The study above shows that the percolation probability is not a function of the coordination 
number of the network alone. I suspect that it is a function of both this and the coordination number 
of the dual lattice of the network, that is p. = f(a-,x,). In other words, p, may be a function of not 
only the connectivity but also the tortuosity of the network. 
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§ 4.10 Cosmology 


The universe is made up of superclusters of galaxies, each of which contains local clusters. Each 
local cluster contains galaxies, each of which contains stars. When stars explode, gas bubbles are 
formed which expand to meet one another, forming walls of materials in the manner of the Voronoi 
tessellation in three dimensions. Within the planets around each stars there exist yet other structures 
which can be similarly represented by the Voronoi tessellation. 

Superclusters are like endless cobwebs covering the space. The Andromeda galaxy, the Sculptor 
group, the Virgo cluster, and the M81 group are examples of the members of the Local Supercluster 
in which our Milky Way galaxy reside. The Pisces-Perseus supercluster is 250 million, and the 
Hercules supercluster 500 million light-years away from us. 

Assuming the big bang origin of the universe, the defects originated in the phase transition 
at the Big Bang could play an important role in the formation of galaxies and their clusters and 
superclusters. Tom Kibble predicted this in 1976 (cf Croswell, 1995), and gave three types of 
possible defects, namely the point-like monopoles, the line-like cosmic strings, and the plane-like 
domain walls. 

Van de Weygaert (1989) studied the statistics of 3-d Voronoi tessellations for the purpose of 
understanding the structure of the universe. Here neighbours are defined by a common polygonal 
face whereas full neighbours have an additional requirement that the line joining nuclei intersects 
this common face. Taking a linear section through d-d, d > 2, the mean length is 


oy2——@ dary ioe 


~ (d—dlptar (241)? @) p (2-4) 


where p is the number density, in other words nucleus density. 

In three dimensions we need at least two points in order to establish the distance of an object 
by a geometrical method. Because the cosmic scale is so large compared with the scale of the solar 
system and Earth, all the observation points we may choose become the same and only one point 
in practice. Therefore the determination of the distance to extragalactic objects, which is crucial 
in cosmology, can only be achieved by the various means of observations from a single point in 
space. This is a limitation that has caused the establishment of distance to be a hot, long-standing 
controversial issue. As the universe is expanding with the receding velocity of objects increases with 
their distance away from us, and as this velocity can be accurately determined by the amount of 
redshift in the light of these objects observed, the study of distance becomes the study of a single, 
universal constant called the Hubble constant. This is only a constant in theory not in practice. All 
numerical values of the Hubble constant used in literature are fictitious to some degree. If its exact 
value is known, then the accurate distance to any cosmic object is simply its radial velocity, i.e. 
its velocity away from us, divided by this Hubble constant. The reciprocal of the Hubble constant 
is called the Hubble time. The importance of the Hubble constant, together with the difficulty in 
finding it, make the observational and the theoretical parts of cosmology inseparable from each other. 
They are also the cause of the proliferation of the modern literature on Astrophysics. One example 
of studies of the extragalactic distance scale is that reported by de Vancouleurs (1993) which includes 
among the objects studied the following objects belonging to the Local Group, namely the Large 
Magellanic Cloud, M31, M33, NGC 3109, as well as the objects beyond the Local Group, namely 
NGC300, 1C4182, NGC2403, NGC5128, M81, M101, M104 (NGC4594), and NGC4571. 
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§ 4.11 Philosophy 


Philosophy precedes science, and so the case is with Voronoi tessellation by more than two hundred 
years. In his philosophical scientific work, Descartes (1644) imagines the universe as a tessellation 
of vortices surrounding stars. According to the pictures he gave, a few of which are duplicated 
many times over, the positions of these stars are random. Among these, the most abundant picture 
resembles a two dimensional picture of biological cells or a Voronoi graph. His idea is that stars 
always position themselves as far apart from one another as possible. At any instance each of these 
bodies resides within a partition of its own, where it acts as the centre of a vortex around which 
everything inside the partition revolves. 

However, when one would like to track the movement made by a body one may consider the rest 
as having a fixed position. Starting from anywhere within a partition, the body under consideration 
moves towards a boundary that lies across its trajectory. Once the boundary is reached, it continues 
moving along that boundary until it reaches a vertex from the requirement of keeping itself furthest 
from surrounding stars, and then it chooses the one of the two choices of boundary branches which 
would make it deviate the least from its present direction. In this way a body snakes its way 
further and further from its starting position. Although the pictures that Descartes gave were in 
two dimensions, there is no doubt that he means, and was talking about a three dimensional space. 
Therefore these two dimensional pictures of his can either be a 2—-d section of a three dimensional 
space, or simply a 2-d representation of it. 

As is the case with the study of incompressible fluid flow by visualising it as a displacement of 
small rigid spherical particles, whose treatment within the same treatise of his predates the ground- 
breaking theoretical works of Hele-Shaw (1899) by more than two and a half centuries, the idea he 
has given about the movement of heavenly bodies predates the idea of van de Weygaert where the 
similarity is obvious in both the treatment of, as well as the objects considered. Van de Weygaert 
and Icke (1989) considers the movements of galaxies within voids with sizes several orders larger 
than themselves. In their simulation, each galaxy moves outwards from anywhere within a void until 
it reaches a wall where, because of the interaction with other galaxies coming from a neighbouring 
void which it meets, it loses its radial velocity and continues to move with reduced speed along the 
plane of the wall. Eventually it will come to an edge where it loses a second part of its velocity 
components, again thanks to other galaxies this time coming from the other two of the three faces 
which comes together at the edge. The last component of velocity it has left then takes it as far as 
the first vertex it should meet and no further. Having lost all the remaining energy to travel further, 
again through the encounter with other galaxies this time from three other edges which meet with 
the edge along which it has been travelling, it joins other galaxies to form a cluster which keeps 
growing all the time. 

If the idea of Descartes is that of stars travelling along a Voronoi graph, then the idea of van 
de Weygaert and Icke represents a universe which is lumpy at Voronoi vertices. Seemingly different, 
both ideas are very similar. Both consider partitions containing nuclei. The only difference seems to 
be that in the former case these nuclei are massive bodies, while in the latter they are voids. Thus in 
a way the two can be said to be dual to each other. Furthermore, the scale being considered seems 
to be by many orders different. Descartes’ vortex idea can easily apply to the scale size of a galaxy, 
while the vertex idea proposed by van de Weygaert and Icke seems to agree well with observations 
made in scale unimaginably large compared with that of the other, since they obviously consider 
giant clusters of over a thousand galaxies in size as being vertices, in other word points. 

Voronoi tessellation thus came up philosophically first and then science. Percolation theory, 
on the other hand, is itself philosophical. Not only that it often sheds light on the underlying reason 
of many things, but it sometimes is the core philosophy in its own right. 

Karma is the central philosophy of Buddhism. In East Asia there are similar sayings which 
mean Karma is deed (cf Lan. Kamm pen karkdam and Th. Kamr gue karkradam). The word karma 
in English adopts a more practical one among the plethora of implications or nuances in meaning, 
which says that it is the sum of actions of a person in one of his successive lives, which decides his 
fate in the next. Another meaning puts it simply as destiny or fate. Karma and enlightenment are 
the two things around which Buddhism philosophy revolves. Karma entails enlightenment. In other 
words, the latter is a subset of the former. To put it plainly, enlightenment is Pcewhile karma is the 
corresponding Pc-process. 

To me the teaching of Buddha is about percolation, and hence the idea was discovered by 
Buddha whom I consider a great philosopher, at least more than two millenia and five centuries 
before it was rediscovered in Physics of our time. Now it may seem ironic after having said that the 
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Buddhist philosophy is percolation if I as professedly a christian should say that I have converted 
myself to the religion as a result of a percolation, having been among buddhists since I was born 
and having led my life as one for twenty years. When I left a job with a good prospect behind me to 
come to England in 1994 I said to myself that having been forsaken by two of the women I most love 
within a period of four years it did not seem that life was no longer worth living and making money 
seemed all very well except that I had no one now to make it for. Then in the sombre atmosphere 
of Manchester I read the two paperback translated volumes of Les Misérables by Victor Hugo which 
suddenly turned me into a christian. I think of this experience now as the percolative workings of 
various elements. Having never been the best student in my class, except sometimes in the subject 
of the English language, I had found myself often in ungraceful academic situations from 1984 to 
1991 when I received my first degree. My study had given me much stress and the life in Bangkok 
with its best percolated traffic jam in the world was no help. Due to some historical reasons and the 
difference in the languages a lanna in Bangkok is usually considered as belonging to a second class 
population. This combined with the heart having been broken from the cause mentioned and from 
the background of having lived with a Kiwi western family and the fact that I have always studied 
in a christian school which had provided me with the necessary background and belief, it was not 
difficult for me to profess myself a christian, but Hugo still has the final credit for it. I spent close 
to twelve years studying at the Montfort College in Chiangmai, Thailand. The college was named 
after Saint Louis Marie Grignion de Montfort (1673-1716) who founded the Congregation of the 
Brothers of Christian Institute of St. Gabriel in 1705 to which my school belongs. 


I still believe in the philosophy of Buddha. I see Buddhism as a philosophy the idea of which is 
an analogy to percolation, but I do not see it as a religion, which to me necessarily must start from a 
myth and have a god. Buddha, however, is no god, and taught his findings which were results of the 
Enlightenment he experienced as a philosophy from the start. What myths there are in Buddhism 
now have invariably been added hundreds if not thousands of years later in accord with the tastes 
and methods of the rulers and preachers. I do not consider this kind of myths as real, and consider 
them superficial and unnecessarily for as good a philosophy as Buddhism. 


In doing a PhD I find that I have to make war with my own ignorance and unproductiveness. 
But no doubt at each step forward and as each new idea comes in I am a step closer to my goal. And 
if I think that I should mind more about the quality of my work than about the end result, then I 
am using the same argument that I use in § 8.2 to explain the economic potential of a country. The 
internet and plastic money or credit cards may be factors which help the birth of the Euro possible. 
But the potential and connectivity has already gathered up considerably since the fall of the Iron 
Curtain and the reunification of Germanywith its amazing one to one exchange from the eastern to 
the western Deutsch Marks. As much as that the fall of both the Iron Curtain and the Berlin Wall 
may owe much to the internet and the spread of information by the media the internal flaws within 
the communist regimes of the Eastern Block countries must have also played a great part. Because 
otherwise why the same has not happened to the West saturated with the media? The West with 
its distributed government, a system inherited from America, has an advantage of more robust a 
system. This is a strong point of democracy. Socialism also has its unique strong point regarding 
the feeling of security in individuals which helps making the system robust. So as the flaws inside 
a percolating cluster collectively break it down, another structure is formed up from the ash like a 
phoenix. As much as individual parts form a single structure, like brooks make river, rivers run to 
sea, so do impurities within a structure break it up the same way as flaws do the percolating cluster. 
The spread of terrorism from the middle east owes much to the connectivity of air routes. 


If we accept Plato’s (360 BC)argument that men are the same because all human souls are 
the same, then any big difference in the cultures of the world can only be satisfactorily explained 
by using the percolation theory. If all human souls are the same and souls are more important 
than bodies, then all men are the same and all societies being comprised of equivalent people will 
necessarily have an identical structure or structural basis. Intrinsic attributes of a structure, for 
example the culture of a country or the way of life of its population, can take on various forms 
according to the phase which it has arrived at through the percolation under the various factors 
which includes historical and geographical influences. One example is the stark contrast on the 
value given to winning and losing between the western and the eastern cultures. As I see it, for the 
former the emphasis is on winners, which is reflected in sayings like winner takes all, as contrasted 
with the emphasis in the latter on losers, for example the thai saying win and become the devil, lose 
and become a saint [bae pen bra, jana pen mar]. As another example, let us consider the japanese 
saying akirameta yo nanisama akirameta, akiramerarenu to akirameta, which are seemingly easy but 
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which has eluded some distinguished western experts in the Japnese language and culture. Months 
after having resigned from a PhD course in Japan, Keiko Saitosent me this poem in an email. As 
a keen archer in kyudo, that ancient japanese art which uses bows with lengths of 212 to 245 cm 
long, I think I can grasp the meaning. But not long afterwards, while browsing through the books 
in a japanese library in Bangkok I came across another translated version of the poem which is 
completely different to what I think it means. In his translation, Blyth (1959) has written, “I have 
resigned myself! Resigned yourself to what? I have resigned myself to never being resigned.” The 
reason I say it is different is that my own version is the following soliloquy, “You are beaten! In 
what way do you say I am beaten? If you said that you shall never be defeated then in fact you 
have already lost.” Kyudo teaches one that results are nothing. This is not only true for kyudou., 
but to all martial arts as well, provided that they are genuine. The training in any art of fighting 
is never to learn how to fight, but to train the subconscious mind such that it will be able to act 
by it self at the right time. The subconscious mind is similar to what Freud calls superego. In line 
with Plato’s argument that the human souls are never evil, to martial arts this subconscious mind 
invariably carries the same attributes to that of the superego. In such perspective the Freudian id 
has no part to play and can be considered as being neither a subconscious mind nor on the same 
level with the superego; whenever pushed one never push back, and every fight is a self-protective 
one. The same is the case with kyudo where there is a difference between an arrow hitting the target 
and the pride of a successful hit. An arrow hits the target best when it was already there before you 
took aim. Similar to the idea of complex superposition in the quantum mechanics theory, the free 
subsconscious mind superimposes and becomes one with the surrounding which includes the target 
as well as the path towards it through the air. The arrow thus runs home on its own accord. No 
one could have put it there; certainly not yourself, so there never is anything to be proud of. Only 
a few months earlier it was that I learnt the art of Kyudo for the first time when on 14¢* September 
1997 in the 36" Meguro-ku Sport Festival of the Meguro district in Tokyo I led our underdog B 
Team of three to win second. The other two members of the team were Arakawa Hiroshi and Suzu ki 


Jiro. Looking back I can still remember how when one third through our round and having not 
scored a single point I suddenly feel one with the surrounding, totally oblivion to the sound of the 
audience behind us, and let go of the target with the result of which not only that I could break 
the egg but also the way the manner in which the arrow hit the target was perfect. I am proud to 
say now that eventhough that hit was the first and only one by me in that event, the other two of 
my teammates from that point onwards never again failed a single shot through to the end of our 
round. I wonder if it is not the case that, having been trained to be at ease and relaxed with the 
bow, my subconscious being, that thing inside me which still do not know much about, kicked in at 
such the right moment that percolated or communicated itself to my teammates, and then, being 
sure of having accomplished the task, left the scene. I am rather glad to be left anonymous in this 
way. To account for my claim of not having consciously aimed that transitional shot, for fifteen 
years none of my glasses has been adequately prescribed to let me see the bullseye clearly from that 
distance. Probably nobody will ever know that it was Kit Tiyapan whose name stands first among 
the three members of the B Team because, reluctant to have my name written in that outlandish 
katagana appear on three certificates for fear that it disgraces my teammates, I went by the name 


Zhang Ming Léng, what was given to me by my late grandfather and its sole user. 


SuShce aye ss 


Waking up to the radio on 30" May 2002 morning I heard on the BBC4 one writer as saying 
that international conflicts and crises occur because matters take on momentum which is sometimes 
difficult to reverse, that it can not be left alone to resolve like playing the russian roulette. I think 
the only thing that can solve an international, or internal, crisis is a counter momentum built up 
in the opposite direction. Some says that force stops dangerous mechanisms and that politics never 
work. No doubt any politics that has no strategies by which to reach at such counter momentum as 
needed will probably never work. 

Life is a dream, or dreams are the other phases of life. If we consider dreams to be in the 
domains where our minds are in different phases from our awaking selves, then the analysis of 
the dreams would amount to the study of these various phases. Qualitative sayings like this are 
sometimes mistakenly written off as nonsensical in the field of science. What is meant when Sacks 
(1973), for instance, speaks of ‘romantic science’ being badly needed is that eventhough art can 
stand apart from science, science can not be separated from art. I do not think such ‘romantic 
science’ is that badly needed, at least not in the field of geometry, mathematics, or percolation. But 
then again, the first two of these are to me essentially the languages, while the last one the music, 
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and therefore also a kind of language, of nature. Music is the language of the mind and the thing 
that holds it together. Arts and music heal the mind. But they may not work, which makes them 
different from medicines. Something mysterious has to trigger before they do. As the ear of science 
they are the things which hold together the eye or structure of science. 

Opposing forces in nature is an immemorial theme which recurs time and again. This dualism 
or the law of polarity shows itself, for example, in the eastern philosophy of the opposition between 
Yin and Yang. This theme came up again in the mid 20‘ century in the name of percolation, the 
interplay between two opposing phases. The dynamic triad where the opposing thesis and antithesis 
come together and resolve each other into the synthesis is analogous with, for instance, the opposition 
between congested and free-flowing roads in the traffic network which resolve each other in the case 
where p, < 0.5 into the band of synthesis having the width of 2(p, — 0.5) and centred at 0.5 (§ 7.1). 

The conceptualising power of man culminates in the recurrent themes found more prominently 
in creative minds (Hankins, 1997). These recurring themes represent faith in science. And if we 
accept that every from of faith is ethical, then all these themes are ethical; in other words, the theme 
of the antagonistic power between Yin and Yang is an ethical part of the eastern philosophy and 
the theme of the opposition between phases in percolation is an ethical part of the western science. 

Percolation is a twentieth century formulation of an old thing. The last straw that breaks the 
camel’s back is exactly the same as the last jigsaw edge added to a network one step before the 
onset of percolation (cf Tiyapan, 1995, KNT2(ii)). Andrew Lloyd Webber says the same thing with, 
‘one Rock n Roll too many takes its toll and the soul out of you’.t But then again, he is also the 
product of the twentieth century. 


§ 4.12 Enlightenment 


Both discovery and enlightenment are percolative processes. Like a detective gathering clues sud- 
denly understands the crime he has been investigating, past experiences of a person helps him arrive 
at the solution. It is likely that much more of these experiences is involved in solving even a seem- 
ingly easy problem. The spinning or dancing stars in the algorithm I describe for my solution to 
the continuum percolation of polygons in § 4.12 can be traced back to my experience in the ancient 
Thai art of fighting using the swords at the Ayudhaya school. Here the ray of the star represents 
the arm of a person and each side of the polygon the sword he holds in his hand. At the school we 
learnt to always keep the sword at right angle with the lower arm at all times in order not to hit 
our friends, since this is no real fighting but a practice. Yet because they correspond to circles with 
greater radii those parts of the sword away from the hands still hits the swords our friends hold in 
their hands, and in so doing set off beautiful sparks flying which could prove extremely dangerous 
if it ever gets into your eyes it scares you more than being hit by the sword. The solution for the 
flexatube puzzle that I discovered while in Budapest in 1990 is another one of the earlier examples 
in which a discovery percolates throught after a certain amount of thinking about a problem. I 
think it takes more than those several days it took me, that is much of my previous experiences 
with other puzzle counts, which makes it possible for me to solve this particular puzzle. This is not 
to mention about my long forgotten class in Euclidean geometry which I had to study when I was 
around twelve years old, ete. 

The Enlightenment movement in Germany was something different. According to Immanuel 
Kant (1724-1804) enlightenment is to have the courage to think, as he has told us in an essay (Kant, 
1784) of his to have the courage to make use of our understanding.{ But the idea is much older than 
the eighteenth century as the Bhagavad Gita, written written in Vedic Sanskrit and being the sixth 
book of the epic poem Mahabharata, says essentially the same thing. Antithesis to the idea of Kant 
is the refutation of Karl Popper (1902-1994). 

The idea that science develops by leaps and bounds is not new, and examples abundant. Kant 
may have started the German Enlightenment movement, but Buddha has found a similar thing 
more than two thousand years earlier. Not only in science, but in other fields for example music, 
revolutionary discoveries occur all the time that necessarily some of them are old ideas dressed 
in a new form. Arnold Schoenberg (1874-1951) discovered a revolutionising twelve tone system of 
harmony which is in fact a mathematical summation of the various scale systems of the ancient Greek. 
In fact I regard his books (cf Schoenberg, 1978) highly not because he was a revolutionising composer 
but because his understanding in the history of music, which can hardly find an equal. Another 


t In The New Starlight Express. 
{+ Sapere aude! Hab Mut, dich deines Verstandes zu bedienen! ist also der Wahlspruch der Aufklarung. 
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example is the idea of Immanuel Velikovsky (1895-1979), whose revolutionising book (Velikovsky, 
1950), eventhough containing many ancient ideas, is an invaluable asset to the world community. A 
good discussion on revolution, discontinuity and scientific thoughts was given by Krige (1980). 
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§ 4.13 Forest fire fighting 


Voronoi graph can be used to aid the decision on the locations of Closed-Circuit Television (CCTV) 
cameras. CCTVs have proved to be very effective in reducing the number of crimes in Manchester 
as well as other places within the UK. In order to be effective, it is important to have no large gaps 
within a control area. Strategically placed, the cameras will give the best cost-effective solution 
while covering the largest possible area. 


Within crucial areas cameras could be positioned in such a way that their ranges of operation 
intersect without gaps. The points of intersection represent the vertices of the Voronoi regions centred 
around two or three neighbouring cameras. The design objective is to produce the maximum covered 
area using the least number of cameras. 


Outwards from each crucial area extends space not being covered by cameras. Similarly around 
other crucial areas surrounding this area also extend such unobserved space. The next step in the 
design is perhaps to make sure that people walking from one covered area to another are safe. To 
do this one can consider the whole covered areas as centres of yet another set of Voronoi tessellation 
orders of unit larger in size. The purpose now is to make sure to position cameras at the positions 
of vertices of the Voronoi regions of this second set of tessellation. 


Both the first and the second tessellations will be subjected to geographical constraints. The 
former would be predominantly influenced by the shape and the position of buildings and sur- 
rounding structures, the latter by the paths connecting the covered regions. Here a vertex of these 
geographically-constrainted Voronoi regions could be a point which is equally far from three covered 
regions. Another set of positions to be considered for placing CCTVs is one of those points equally 
far from two covered regions along the shortest path between them. 


At a graduate development programme on 16¢" November 2001 I gave a presentation for ten 
minutes on a title division of space. In it I described the current project of mine as concerning 
porous media, or division of space in general. The part presented is from a section for miscellaneous 
applications. Mathematical models of partitionings, for example the Voronoi tessellation pioneered 
by G. F. Voronoi and G. L. Dirichlet in the 19** century, help towards understanding physical 
Euclidean and non-Euclidean world. Procedures based on these models help solve many physical 
and strategical problems. When I was fourteen years of age I was trained in a course for those 
who volunteer to fight forest fires in the area around the Sudeb mountain, close to where I used 
to live. Although after the course I never had an opportunity to use it, the knowledge obtained 
from that course has given me interest in forest fire fighting. To mention but one of the relevant 
topics contained in that course, one can imagine a forest fire station as being a nucleus of a Voronoi 
partition of area under the protection of that stations. Here the distance from a station to any point 
on the forest ground is not a straight line but the time it takes a fire fighter from that station to 
reach the point in question. This time is affected by the tortuosity of the path, in other words the 
degree of winding, as well as the difficulty of the climb. There normally is an observation tower 
at each fire station, so we may safely assume that every nucleus is equipped with one. Then the 
exact location of a fire observed can be located on the map from the intersection of lines of sight 
drawn from the neighbouring towers towards the direction of the fire. These lines of sight only give 
the position of the fire on the map. The distance measured along such a line does not necessarily 
correspond with the Voronoi distance which has a unit of time. The area covered by a tower depends 
on its height; a higher tower can report a fire occurring at a further distance. The area of covering 
is circular if the forest is a flat plain. But such a case is rare and in general this area is a distorted 
circle the degree of distortion of which depends directly on the contour of the land around it. 
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In Figure 4.15 if h is the height of a tower and r its radius, 
then r1 < re implies he > hy. 
Figure tower. Range of observatory towers. 


The dashed lines are boundaries of Voronoi 


C eo regions, solid boundaries the observation range 
} of the towers, and straight lines from nuclei 

\ | the lines of sight. In Figure 4.16 the Voronoi 
ee boundaries are not straight lines as a result of 


tortuosity. Observations from only two tow- 
ers suffice for finding location of the fire, but 
an observation from the third tower would re- 
duce the probability of an error. 


Figure tuos. Tortuous boundaries 


I also talked about strategic locations. I once listened to a job presentation by Tesco where 
I learnt that they use the Geographical Information System to place their new stores in strategical 
locations. The planning department at Tesco uses what they call the porcupine diagram which looks 
like the rays of light emanating from a star or the quills from a porcupine. These rays radiate from 
a supermarket and their length represents the drive times required to get to the store from the 
other end of the line. Factors affecting the locating of new stores include for example drive time, 
competition, logistic, parking, and traffic. 
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road 


The porcupine diatram superimposed on a 
map. Triangles are Tesco supermarket stores 
while circles are those belonging to their com- 
petitors. The spatial boundary of the Voronoi 
diagram is in general different from its drive 
time boundary, as shown in Figure 4.17 where 
broken boundary lines represent Voronoi par- ; 
titions when the distance is the drive time 
while solid boundary lines that when the dis- 
tance is the spatial distance. 


Fe Spatial _ 
drive time 


Figure fstra. Porcupine diatram su- 
perimposed on a map 


A similar approach to the above can be applied to help locate the Closed Circuit TeleVision 
cameras in a strattegic location. Suppose that now the triangles in Figure 4.17 are important places, 
for examle business centres, schools, or universities; let us call these sensitive areas. Then security 
cameras should be placed at both points A and B as well as at the sensitive places. Here the solid 
boundary lines meeting at the point A represent the Voronoi boundary for walk time instead of the 
actual spatial distance. Moreover, a camera should be placed at the point C which is the point where 
the shortest walkway linking two neighbouring sensitive areas meets with the Voronoi boundary of 
the walk time, in other words a point which lies midway along the shortest path that joins nextdoor 
sensitive areas. The reason for this is that these points are likely to be frequented by people going 
from one sensitive area to another, therefore they are prospectous for robberies. On top of that if 
a robber wants to flee from one sensitive area to another his sensible choice would pass through C 
while A with its connecting three different routes would be a clever choice to choose iconfound a 
pursuer, or likewise B if he is driving. 

Thad been first to the police headquarter and then to the city council office because I wanted to 
know whether security cameras have been placed at locations analogous to these points A, B, and C, 
but has been told that the information I asked for is a sensitive one. The answer is understandable 
because at the time President Bush was trying to get his hand on Bin Laden and Prime minister 
Blair had just declared Britain at war and alert. However this was not good for my theory since I 
had no way of knowing whether this approach is a new one, or whether it could be used to improve 
the security in the city even further. I hope that most of these strategic locations A, B and C have 
already been covered by security cameras even if the decision to do so had been arrived at by some 
other theories different from the one I suggest. Unlike in the case of sensitive places, the cost of the 
cameras to be placed at these strategic places may have to be the responsibility of the city council 
because their importance is not immediately obvious owing to their locations. In contrast, most 
schools, universities or businesses should be willing to help with the cost of such installation from 
which they would directly benefit. 

On one slide I explain how one can divide transformations into affine and non-affine ones. The 
affine transformations are governed by the equations 2’ = ax + by+p andy’ = cx+dy+q. As 
a conclusion, mathematical models are beautiful because they give us understanding, and they are 
useful because they stem ideas and prpocedures necessary for solving problems. The presentation 
has gone from forest fire fighting to crime prevention without my knowing it, so the future works are 
to collect real data and practices, to analyse and compare with the theory and simulations, and then 
to implement and monitor the operations which I think unlikely to happen because it is impossible 
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for me to become a member of the Greater Manchester police force. Dr. Jim Boran who was present 
gave good’s for project understanding, overview and structure, summary, examples, use of colour, 
connection with drawings, enthusiasm, pointing at screen, and familiarity with the material. He 
wrote that the explanations were clear, the content technical but with good personal view, but that 
I looked at the screen too often and at times was difficult to hear. Bigger lables are suggested. 

Naval forts are positioned with an idea similar to forest fire stations. Each fort forms a circle 
of effective defence around itself. These circles form a chain like beads on a necklace. One example 
(cf Petersburg, 2001) of this are the forts of Kronstadt near Kotlin Island in the Finnish Gulf, 20 
kilometres from Saint Petersburg, which have been used as a base for the Baltic Fleet and is now 
controlled by the Russian Navy. Here seventeen forts had been built between 1704 and 1896 which 
form a guarding barrier for the city of Saint Petersburg. Examples of these forts are the Totleben 
Fort, founded 1886-1913, and the Alexander I fort, founded 1836. 

In the study of traffic in § 7.1 we consider the percolation of roads, which are edges of the 
structure. We can also use the same structure for the study of fire protection and evacuation in 
cities, in cases of disaster, but now it is instead the percolation of cells that interests us. Roads form 
effective fire barriers as well as divide the conflagration into partitions. By carefully managing these, 
for example putting more efforts on the key or critical partitions, the flames can be contained more 
quickly and the damage minimised. These zones are also important for evacuation planning, for 
example that made by the Greater Manchester Police. In Tokyo where there is always a fear of big 
earthquake, informations are given out in plenty to tell people what to do in case such a disaster as 
the Great Kanto Earthquakewhich occurred on 1%* September 1923 should struck. School grounds 
are usually assigned as evacuation centres. And as the distance one has to walk to get to one of 
these is crucial for one’s safety, the evacuation zones assigned by the city councils there naturally 
divide the city into domains that approximate the Voronoi tessellation. In 1998 when I was in Tokyo 
the fear reached its height, since it was generally believed that big earthquakes in Tokyo occur at a 
period of approximately seventy-five years. 


§ 4.14 Fractals and percolation 


In doing simulations on filtering membranes, one usually assume that the blocking particles are all 
of the same size. Or one may apply more intuition and experience, and say that particles should 
have a normal distribution. Any mineral engineer will be able to tell that it is normally the case 
that the distribution of aggregates according to their sizes is normally normal. But one must keep 
in mind that the normal distribution here is by weight not number of particles. Therefore it is 
unlikely, except in a few special cases, that simulations which assume a normal number distribution 
of blocking particles will represent the real process. 

A pile of aggregates with a normal distribution is likely to have a fractal number distribution 
(cf Liebovitch and Scheurle, 2000). Such fractal distribution is hyperbolic towards the lower size 
ranges. But the overall distribution is more complicated, that is to say, a mixture of normal- and 
hyperbolic distribution. 

So far we have only considered percolation by competition between two phases. We have 
looked at networks in a cubic box and have assumed that the network is initially available in its 
entirety. But what if one has a competition of three phases or more? Or what happens when there 
are only parts of the network from the start? The picture of this can not be clearer than that of 
politicians arguing for votes, or the opinion polls of people across the social cross-section. Lustick 
and Miodownik (2000) consider this problem in the context of politics where the agreement clusters 
necessarily appear in various colours not merely black and white. 

Applying this to percolation and a whole new dimension opens up for investigation. One 
possible approach is to consider only an arbitrary part of the network within our cubic box. Clearly 
this is only meaningful if the part being considered is itself a percolating cluster. Carry this one 
step further and we can have percolation within percolation, when each cluster within the network is 
itself subject to another percolative process, threatening to destroy it for instance. Such a dynamic 
scenario is a yet untread water which should open up much ground for investigation. 

In the early days of the theory, literature on percolation only concerned itself with fluid wetting 
or blockig bonds or sites in the kind of situation that is said to be dual to the diffusion problem 
(Broadbent and Hammersley, 1957; Hammersley, 1957, 1961). The subject generally looked at self 
avoiding walks and a measure of connectivity, the connective constant. From then on the appearance 
of the subject has somewhat changed, and it has become connected to Physics and fractals. The 
reason why there are very few works on percolation of a random network like the Voronoi tessellation 


is probably because there seems to be no need for such study, since the applications in Physics have 
told us that the regular lattices can represent the noncrystalline structure of the metal well. Moreover 
the only tools we have now, namely the Hamiltonian and power series method can not be applied in 
its present form to random tessellations, since there are no modulus relationships among the vertices. 
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§ 5. Porous media 

Patrik e¢ al (1999) study the propagation in random Delaunay lattice. Particle on arriving at 
a site in the lattice deflects over the largest possible angle to either the right or the left, depending 
on the right- or the left nature of the scatter site. After the particle has passed through the site, 
the latter goes into the reverse state. When a similar study is done on the triangular lattice, the 
entire trajectory quickly becomes confined to a particular strip which is bounded by two adjacent 
parallel lines of the lattice. They explain the propagation as being due to a blocking mechanism 
which prevents the particle from moving in a direction opposite to the propagation direction for 
more than a few steps. 

The flow of fluid in porous media follows the Darcy’s Law which states that the rate of flow 
through such a medium is proportional to the potential energy gradient within that fluid. The 
constant of proportionality is the hydraulic conductivity, which is a property of both the porous 
medium and the fluid moving through it, v = Q/A = —kdh/dl. 

The average velocity over the entire cross section is called the superficial velocity, v, = Q/A = 
m/pA. The velocity that is based on the actual open space within the porous media is called the 
interstitial velocity, vu, = Q/(eA) = m/epA, where ¢ is the porosity, e = V,/V, = (Vi - Vs)/Vi, Va, 
V, and V; are respectively the void, solid and total volume. 

The definition of porous media is different from that of porous materials. A porous medium is 
a medium through which other substance may pass, whereas a porous material merely means some 
certain kind of material the internal structure of which is filled with pores. Most of porous materials 
can be used as porous media. All of them are useful because of their internal structure, and though 
we do not need to know this to be able to use them, we do have to understand it if we want to use 
them efficiently, or if we want to improve upon some of their particular properties. 

The outer bark of Quercus suber L., for example, has a property that is ideal for its commercial 
use as cork. Its material property is such that it neither shrink nor expand when stretched or 
compressed. This makes it an excellent insulator of both heat and sound as well as good for damping 
vibration (cf Ashby, 1990). It has high frictional coefficient, and is both impervious to liquids and 
chemically stable. These properties make it ideal as wine corks. By understanding its internal 
structure and mechanism that makes it stay in the same shape when experiencing external forces, 
scientists have succeeded in making a synthetic material that shrink, instead of expand radially when 
pressed. When such material is used as cork, it can be easily pushed inside the neck of a bottle. 
When we release the force it will expand to its full size and fit snuggly where we placed it. 

Pores introduced into a fabric can also increase its commercial value by giving it a lighter 
weight, higher heat retention rate, which makes it ideal for both ski and snow-board wearer and 
casual wear (JETRO, 2001). 
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§ 5.1 Medical science 


Many diseases can be best thought of as related to percolation when a threshold exists passing the 
point of which it is difficult to return or to get back to normal. For example a cut may take several 
weeks to completely heal, but muscular strains could take several years and even then they usually 
leave a weak spot and thus can not be considered as completely healed. This means that despite 
the turn over of cells within the fibers of the muscle, the strain still prevail. In other words it 
has buried itself into the structure of the fiber and no longer is related merely with the individual 
cells. Not only muscular fibers, but also the brain and the nervous system may be viewed as a 
kind of networks. Therefore it is not difficult to see many nervous or brain diseases as percolated 
phenomena. Madness and its onset is an easy example. Deafness, either gradual or sudden, is 
another one. The difference between a sudden and a gradual onsets of deafness lies in the position 
of the percolation threshold on the timescale. In the former the network percolates after a period of 
hidden graduation or deterioration in the condition of the inbuilt sound detector, while in the latter 
it percolates before the graduation down towards the deafness. Most books on otolgy talk about 
sudden onsets of deafness, normally overnight. The reason they are much talked about is more likely 
to be because of their tragic nature than because they are common. It is interesting to note that 
the word otology means the study of the ears, -logy is suffix which comes from the Greek word logos, 
meaning the study of, while ot or dt means ear. It is probably a coincidence rather than a liguistic 
relationship between the two languages that oto is the Japanese word for sound. 

I should have something to say about the Meniére disease because both my previous general 
physician Dr. Sreedharan and the present one Dr. Chan think that it is what I have. I do not quite 
agree with them, but if both of them were right and I am wrong then Meniére disease results from 
the accumulation of certain things which then percolates, and I think I know what these things are. 
This would have been rather a medical breakthrough because all medical textbooks that I have come 
across anonymously agree that this is a disorder the cause of which is excluded from its definition. 
In other words all we know about is what its symptoms are, nobody knows what causes them. What 
I maintain is this; provided that both of my doctors diagnosed correctly then the cause of it must be 
percolation. Having said that, I do not think that they did diagnose right, for eventhough I have both 
the pressure in the ear and the tinnitus, I never have vertigo. It is true that I have some experience 
of syncope which is even worse than vertigo, but they are not the same thing. Physicians, however, 
insist that you must have vertigo no matter if you say you don’t, because then they would know 
that you have the thing called Meniére disease the definition of which they do not know anyway! 
The disease is named after a french physician Prosper Meniére who first described it in 1861. 

Tinnitus is the constant rumbling or ringing in the ears. The sound can be real and sometimes 
can be heard by others. Many things can cause it, for example (cf Andrews, 1997) excess noise level, 
alcohol, allergies, antibiotics, blood glucose or blood pressure swing, circulation changes, cranial 
or jaw-joint misalignment, fever, inflammation, temporomandibular jaw joint diseases, tumours on 
acoustic nerve. It can also be caused by metallic — aluminium, lead, or mercury — poison. If the 
cause of it is a prolonged or excessive level of sound, then the process would be similar to that which 
causes, for instance, the repetitive strain injury. 

I will now explain why it should have something to do with percolation. First, I think it is 
sound or the excess of it which causes the percolation. Next let me give some facts which lead me 
to the conclusion above. Around the turn of this millenium a friend of mine bought two concert 
tickets and invited me to join her. Seldom been to a concert, I was delighted. And having noticed 
that the program includes a piano recital of one movement from a sonata, probably the fifth, by 
Scriabin, I decided that I would do my homework in order to gain as much as possible from the 
concert. At that time I had recently bought the music, a complete sonatas by Alexander Scriabin. 
They are a total of ten sonatas, and I sat at the piano and read them one by one, day after day. 
Ten hours a day at the piano was sufficient to give me the obvious sign of an ear problem. For a 
few days I could not hear anything clearly, and could hardly speak normally. The second sign came 
not long after I had been to a Community Action conference held in Liverpool. The conference was 
something new and was very interesting, but I discovered there that young volunteers enjoy too loud 
a music on the dance floor at night to the cost of my ears. Again the following few days gave me the 
most alarming feeling, I hardly could hear anything, and whatever sound I heard seemed like coming 
from the outside to me inside a sealed tank. This together with the experience of having lived in 
Bangkok, the city where noise polution ranks number one, and that of having listened to loud music 
myself when I was young, have combined to reach the limitting threshold. As I am writing now 
I still have yet to recover from the second trauma to the ears mentioned. There is a saying that 
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the third time pays for all (cf Tolkien, 1955), and so I hope that the third time shall never come 
considering that the second one has already been this bad and I am in doubt whether I will be able 
to recover from it. But to me it is clear that this has got something to do with a limitting threshold 
and thus percolation. 

In the case of Beethoven, who also had an ear problem which results in a total deafness, most 
modern physicians think that the cause was multiple sclerosis, which I also disagree. As a great 
pianist and a conductor he was exposed to much sound, so I suspect that the latter is also the culprit 
in his case. It seems an irony that for such people, as well as for myself, music is life and music 
hurts. 

Some thinks of multiple personalities as the fragmentation of the mind or brain (cf Keyes, 
1999) which causes a person to identify himself as different personalities each of which has its 
own memory separate from the others. There is a transfer of control at the switching from one 
personality to another, and all the personalities could use the same body in turn. It is more 
likely that instead of fragmentation the various personalities are different phases coexisting in the 
same network of the mind. Like a polyglot or a normal person switching phases among different 
languages he knows, a person with multiple personalities unconsciously switches himself from one 
self of his to another. Multiple personalities often report head voices of one self talking to another. 
These head voices are distinct conversations and thus are different from those experienced by people 
with schizophrenia. The various personalities have different Electro-Encephalograms, Intelligent 
Quotients, and psychological test results. This altered state phenomena is normally cured by fusing 
the personalities together, but some say that the this is not necessary as long as all the personalities 
are aware of one another. Similar to multiple personalities a person is often said to have good and 
bad sides, or in some cases selves (cf Stevenson, 1886). 

We still do not understand much about sleep, that state where the mind finds itself in phases 
which are different from the awaking self. No one seems to know why it is neccessary that we sleep 
at all, but all animals sleep, or die if they are deprived of it. Dolphins sleep one hemisphere of the 
brain at a time. Sleep and wakefulness are two different phases of the mind, and the sleep itself may 
contain more than one phase. The transitions back and forth among these various phases are the 
same as the changes of phases characteristic to percolation. A person normally has several dreams 
while he sleeps, but only the immediate one from which he is wakened up is remembered. This may 
mean that during sleep the mind is switched among various phases, or it may mean that in sleep 
the mind only has a short-term memory. 

Subconscious mind can sometimes come to the front. This often happens when the conscious 
mind becomes weak. When a man becomes drunk, for instance, he may be able to find his way home 
only to wake up the following morning, sober and wondering how he has got there. This is because in 
the drunken state his mind becomes muddled up by the effect of alcohol that the subconscious mind 
took control to lead him home unconsciously. Multiple personality represents the fragmentation 
of the subconscious mind into virtual clusters each of which then alternately comes to the front to 
parade as a person. These clusters are probably superimposed in three or higher dimensions, without 
overlapping one another, in a way similar to the intertwining of clusters in a three-dimensional 
Voronoi network. The change of personality in this case is then a transfer from one phase to 
another. The first and most important fragmentation which leads towards a multiple personality 
seems to happen only in children at around the age of three, when the mind is in the forming and 
the language of the mind is predominantly geometrical, while later and minor fragmentations are 
possible much later afterward. Our minds during sleep seem to be another layer separate from 
and exists below both the conscious and all fragments of the subconscious mind, as can be seen by 
the fact that a person with multiple personalities also needs to sleep. Some of the most fearsome 
and the least understood sicknesses like Parkinsonism and Encephalitis Lethargica, or the sleeping 
sickness, affects only the conscious part of the mind, not the higher faculties of the unconscious 
part (cf Sacks, 1973). One of the effects of the medicine laevo-dihydroxyphenylalanine, or L-DOPA, 
seems to be that of letting the subconscious mind take over to motor functions. The condition 
of the patients usually improves quickly soon after first put on the medicine, then overshoots a 
stable condition and shows adverse effects of the medication which are no less gruesome than the 
symptoms before starting to take the drug. These counter symptoms probably occurs in Control 
Systems as an overshoot in the output in response to a step function which represents the usual 
constant daily dosage used. Because such undesirable symptom occurs in most cases, dosage should 
either be reduced before the overshoot occurs in accordance with the empirical time constant of the 
response, or increased very gradually from zero at the beginning in order to reach the steady state be 
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reached without an overshoot, as an analogous to an over- or critically damped control scheme. One 
of the most intriguing effects of too much use of L-DOPA is that primitive, sometimes subhuman, 
behaviours could be brought to the front while the patient himself can only stand back as a witness 
to his own self without being able to do anything to stop them. 

In the art and science of Neurology there is no lack of phase transition phenomena. So much 
so that symptoms normally come in pairs of opposing poles, for example aboulia — hyperboulia, 
automatism — command-negativism, bulimia — anorexia, and perseveration — block. Within these 
pairs the poles may switches suddenly as can be seen in kinexia paradoxa, the explosive transition 
between hyperkinesia and akinesia. Somewhere between the two poles lies our normal conditions. 
In many of post-encephalitic patients taking L-DOPA, this middle ground which starts off very wide 
can rapidly shrink until the patients find themselves balancing on the edge of a knife and it becomes 
impossible to calibrate the drug to the right amount. 


§ 5.2 Zeolites 


Zeolite is the name given to a group of minerals with a porous structure. It is used as molecular sieves 
as well as in many chemical engineering processes. It may be an important ingredient responsible 
in lubricating the fault lines in earth crusts, thus making earthquakes less severe. Evan et al (1995) 
found foliated cataclasite and ultracataclasite in the San Andreas faults. These are composed of clay 
and zeolite. In the case of the ultracataclasite, there are fragments of 20-100 um diameter feldspar 
and quartz embedded in a matrix of clay and zeolite which has grains of sizes smaller than 10 pm. 

The chemical composition of zeolites is that of sand, ¢.e. aluminosilicate. Their general formula 
is (Dana and Dana, 1997) 

(Na, Ca, Ba) 1-2) (Al, Si)s O10 : nH,0, 

or, as given by Gottardi and Galli (1985), 

(Li, Na, K) (Mg, Ca, Sr, Ba)a[Al(a+2a)Sin— (a42a)O2n] ‘ mH20. 

Normally m <n. They differ from sand in that they have large internal cavities. These cavities 
increase their internal surface area as a result of which they can be used as catalyst or molecular 
sieves with both shape- and size-selectivity. One example is the use of zeolite as sieve to separate 
iso octane, which has high antiknock property, and iso pentane from octane and pentane. Zeolites 
can not withstand high temperature because they rapidly lose water. Eventhough this process is 
reversible, their molecules collapse at temperature higher than 600°C. Around 41 types of zeolite 
occur in nature. Linde Division of the Union Carbide Corporation produced the first synthetic 
zeolites in 1950s. 

The name ‘zeolite’ was coined by A. F. Cronstedt in 1756 from the Greek zein, to boil, and 
lithos, stone. The structural units of zeolite comprises of the primary building units of silicates in the 
form of XO4 tetrahedra, where X is mainly Si. Other basic units are the chain of fibrous zeolites, the 
singly connected 4-ring chain, the doubly connected 4-ring chain, the 6-ring either single or double, 
the hexagonal sheet with handles and the heulandite unit. 
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§ 5.3 Crystalisation 


In the diffusion theory of crystal growth, the overall rate of crystallisation is determined by 
the rates of two processes occuring one after the other, that is diffusion of solute from the bulk 
solution to the interface between solution and the crystal, followed by integration of solute atoms 
into the crystal lattice. The rate of diffusion of the former is R, = k/,(c — cq), while the rate of 
surface reaction or integration is Rg = k,(c; — c’)", where c; is the interfacial concentration. The 
value of the diffusion mass transfer coefficients k!; when estimated from the growth is considerably 
different from the same value that is obtained from the dissolution experiment. But if we assumed 
that they are equal, then R, = k,(Ac — R,/ka)", which, when n = 1 gives Rg = K Ac” where 
1/K =1/ka+1/k,, and when n = 2, Ry = ka [(1 + ka/(2k-Ac)) — [(1 — ka/(2k,Ac)?) — 1)*/?] Ac., 
but there is no general solution for all n’s (cf Garside and Mullin, 1968). 

Particles in a crystalliser are kept in suspension by a stirrer or a pump. Lim et al (1999) 
study the effect of the attrition when crystals encounter with high speed impellers inside these 
apparatuses. When the impact energy exceeds the crystal strength, crystals fracture which gives 
rise to a particle size distribution as a result. Impact can occur at faces, edges or corners of crystals, 
but in the attrition model only the contact of a crystal corner with another flat, much harder object, 
for instance the steel impeller, was considered. Furthermore, crystals are assumed to have the shape 
of a cube or other polyhedra, but in the model the crystal faces forming the contacting corner are 
replaced by a cone having an included angle of 120°. In the vicinity of impellers the flow is turbulent 
and crystals travel in a random manner. Repeated attritions reduce the crystal size, assuming no 
competing effect of crystallisation. They assume a normal volume shape factor distribution and 
proceed to simulate according to a procedure recaptured here as Algorithm 5.1. The input to the 
algorithm is the impact energy W,; the outputs are wy(J) and c(J). The hardness of a solid is 
its resistance to local plastic deformation. The contact pressure of a plastically deformed cone is 
assumed to be the same as the Vickers hardness H,. An isotropic material has two independent 
elastic constants, namely the shear modulus p and the Poisson’s ratio v. All the other constants can 
be determined from these two quantities. Here a is the volume shape factor, I the fracture resistance, 
K,, the efficiency of stress field created by the impact between the crystal and the impeller, « stress 
field parameter, K = 5, fy quasi-isotropic shear modulus, N the total number of fragments, W, 
impact energy, H dynamic hardness, Lmin and Lmax respectively the minimum and maximum size 
of a fragment, a characteristic size of the plastic zone, r the distance from the peak of the cone, rmax 
the maximum distance from the peak of the cone to the newly created surface and J the particle 
size classes. The values of H,, w, and W, used were that of magnesium sulphate heptahydrate and 
potash alum; r; and rz are random numbers. 


Algorithm 5.1 Fracture by attrition, Lim et al (1999). 


for 1 = 1 to 50 do 
ary 
T/K, © hWe? HP/3 /(5.2p) 
N€7x 10-4*W,H®K3/(ap*T?); 
for j= 1to N do 
Lmin ¢ 32pT'/(3K,H7); 
Limax Tmax / 2} 
calculate rmax} 
r + exp [(13 loga — logr2)/13]; 
L © 3u0 rt /(We? HH? Kr); 
find J corresponding to L; 
wew+L; 
w(J) + w(J) +L; 
cJ) — e(J) +1; 
endfor 
endfor 


w;y(J) — w(J)/0; D 
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§ 5.4 Fluid flow within networks 


Flow of viscous fluids through networks of geometrical objects is an important topic in various 
disciplines of engineering. Happel (1959) studies two cases of the flow of viscous fluid relative to 
arrays of cylinders, one parallel while the other perpendicular to the cylinders. This is found in 
practice as the flow through a bundle of heat exchanger tubes. 
The flow pattern within a void of a porous media follows the equations of flows with vorticity, 
in 2-d 
ay 10 187% | 
OF por) oes 


06 


and in the axisymmetric case 
0 dy oO Op | ¢ 
ror sinOOr | r306sin@00 
(cf Rowe, 1965). Or equivalently to both equations, 


C= 1 (O(rvg) _ Our 
Seco a): 


when vg = 0%/Or and v, = —Oy/(rd@) in 2-d, and vg = Ow/(rsinOdr) and v, = —Ow/(r? sin 008) 
in the axisymmetric case. The vorticity, ¢, can be used as boundary conditions, for instance ¢|,9 = 
—0v,/a00 or C|p=a = Ov, /a00. Or it can be used within the hole, for example ¢ = k sin @ which gives 
the solution w = (air~! + esr + car?) sin 8, or w = (esr + car?) sin @ sin @ if c, = 0. This solution is 
a part of the general polynomial for the stream function, 


wy =(---cor ? +err* +2 + car + car? + ---) sind. 
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§ 5.5 Material science 


A chiral is a group of points, or geometrical figure, whose mirror image can not be brought to 
coincide with itself. Achiral is the antonym of chiral. A chiral object is an object which fails to be 
achiral. Chirality is a purely geometrical property since since all the operations involved, namely 
the plane symmetry of the reflection, the rotation, and the translation, are all isometries. Chiral is 
used in the studies of molecules and knots. 

The Poisson’s ratio, v, is the ratio between the transverse contraction strain and the longitu- 
dinal extension strain, that is y = —>. The theoretical value of the Poisson’s ratio can range from 
-1 to 0.5, but for normal materials it is generally positive. At vy = 0.5 the bulk modulus is much 
greater than the shear modulus and the material is incompressible, while at v = —1 the opposite is 
true and the material is very tough and highly compressible. The bulk modulus B, and the shear 
modulus G are relatated to each other by the equation B = 260 ty) | For rubber this value is 0.5, for 
aluminium 0.33, while for cork it is approximately zero. Materials with a negative Poisson’s ratio 
have been found whose structure is re-entrant (Lakes, 1987). Applications of such materials include 
robust shock absorbing material, fasteners, and stoppers of the wine bottles. 

Chemical reactions can be thought of as phase changes in percolation. For example the ex- 
traction curves for Sb shown in § E.1. These curves represent an s-shape starting from one phase, 
represented by 0% Sb, to another at the maximum per cent extraction where it saturates. All the 
per cent extraction graphs shown in § E.1 show them with high slope at ¢ = 0. This is only for 
the convenience of drawing, since it is difficult to draw curves with an s shape smoothly on the 
computer. Also, the data obtained from the experiments do not extend to the time immediately 
following ¢ = 0. Extracting the solution using pipette takes some time to do, and therefore it has 
not been possible to prove experimentally whether the extraction yields start off with zero slope at 
t= 0 or not, eventhough one might conjecture that this is likely to be the case if one considers the 
extraction yield in the leach solution as a developing phase in the continuum of the solution. 

Particle sizes come in a variety of definitions. Svarovsky (1977) divides them into three groups, 
namely definitions by equivalent sphere diameters, by equivalent circle diameters and by statistical 
diameters. These are listed together in Table 5.1. 


diameter criterion 

volume diameter equivalent volume of sphere 

surface diameter equivalent surface of sphere 

surface volume diameter surface to volume of sphere 

drag diameter resistance to motion of sphere in the same fluid at the same velocity 
free-falling diameter free-falling speed of sphere, same fluid and particle density 
Stoke’s diameter free-falling speed of sphere if Stoke’s Law is used (Re < 0.2) 
sieve diameter diameter of sphere passing through the same square aperture 
projected area diameter projected area of a circle, the particle resting in a stable position 
projected area diameter projected area of a circle if the particle is randomly oriented 
perimeter diameter perimeter of the outline of a circle 

Feret’s diameter diatance between two tangents on opposite sides of the particle 
Martin’s diameter length of the line which bisects the image of the particle 

shear diameter particle width obtained using an image shearing eyepiece 


maximum chord diameter maximum length of a line limited by the contour of the particle 
Table 5.1 Particle size definitions. 

Particle size distribution comes in four types, distribution by number f,(x), by length f(z), by 
surface f,(a) and by mass or volume f,,(z). Conversions among them are done by fi(«) = kitf,(a), 
fs(a) = koa? fn(x) or f(x) = kg? fn (x). Conversion is only possible if we know the shape factor’s 
dependence on particle size, because k; often contain a shape factor. The distribution frequency is 
by definition f>° f(x)dx = 1. 


(m, df (x) /dzx, Q) steed separator sevemiowy, (my, df /dx, O) 


| underflow 
(me, df./dz, U) 


Figure 5.1 Schematic diagram of a separator. 


Small particles tend to flocculate with one another. This makes it impossible to do experiments 
with very fine powder. Therefore any experiment which claims too fine a size as a control parameter, 
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for instance in the micro metre range, must bear in mind that particles of such small size ranges 
tend to cluster into hard agglomerates bound by strong chemical bonds, for example from a previous 
chemical or thermal treatment, or into soft agglomerates by van der Waals attraction or by capillary 
forces. In ceremic making, this results in nonuniform packing during forming which leads to large 
voids or flaws after thermal processing. As one expert put it, you can not have powders in the size 
range of microns because they will disappear instantly into the air. One way to deal with them is 
to mix them into slurry. 

Powder is also subject to impurities from the earliest stage of its life, that is during the 
comminution, which can be done by various methods, for example mortar and pestle, ball milling, 
jaw crushers or crushing rollers. The impurity comes from abrasion pf the grinding media, which 
can be effectively avoided in the case of the jet mill, where particles are driven by air streams in 
opposing directions to collide with one another among themselves. Powder can be characterised by 
its size distribution, surface area, shape, composition and crystal structure. 

Particle size distribution can be determined by means of Stoke’s law, screening and microscopy. 
Stoke’s law states that the steady state velocity of a spherical particle travelling through a fluid is 
Ur = 2(pp — pp)ar?/9n, where a can be due to gravity, in which case a = 9.8 m/s, or alternately 
due to centrifugal force, a = wx. The time required fro a spherical particle of of radius r to travel a 
depth z is t, = x/v,. No particles of redius larger than r will be found at depths less than x at time 
t,. The fraction extracted mass at short time intervals in an experiment using a graduated cylinder 
is constant, 7R? fe f,dz =m. 

The equivalent spherical radius is the radius of a solid sphere that has the same steady state 
velocity in the slurry as the particle. The volume distribution function is f,(r) = dV/(Vrdr). 
The number of particles in the powder having radius r is N(r) = 3Vrf,(r)/47r?, the mode of the 
distribution is the peakk and the mean radius is [>° rN(r)dr/ J>° N(r)dr. 

When finding particle size distribution using screening methods, sieves are arranged in a stack 
with their apertures decreasing from top to bottom. Mass fractions retained on each of the screens 
is f; = m,;/mr, which can then be converted to N(r). 

Microscopy methods use a variety of microscopes, for instance optical, SEM or TEM, depending 
on the magnification required. Measuring the dimensions and determining the shapes of the particles 
can be done manually with a ruler, or by using an image analyser. 

Powder surface area is determined by gas adsorption methods. The specific surface area, ?.e. 
surface area per unit mass, can be found by s = NoV,,/Vo, where N is Avogadro’s number, oo the 
effective cross sectional area of the adsorbate molecule, V,, the volume per gram of a monolayer at 
STP and Vo the STP number, 2.24 x 10* cm?/mole. 

Monolayer adsorption is used when molecules strongly interact with a surface to in a uniform 
monolayer. The Langmuir equation is 0 = kP/(1+kP), where 0 = V/V,, is the fraction of sur- 
face covered and K a constant. Then P/V = 1/(KVn) + P/Vm and the Langmuir isoterms are 
plots between V and P/P5, Po being the saturated vapour pressure. For multilayer adsorption, 
z/[V(1—2)] =1/(CVm) + a(c — 1)/cVm, where « = P/Py. 

Permeametry measures the flow of gas under a pressure head through a packed bed of particles. 
The Darcy’s law of laminar flow through porous medium is u = dV/(Adt) = KAP/é. The Poiseuille 
equation for a fluid flowing through a tube of radius r is Q = r*AP/(8né), where 77 is the viscosity. 
It is also written as h/L = 32nv/(gd7), where h/L is the headloss per unit length, 7 the kinematic 
viscosity (m*s~'), 7 = 1/Pw, Pw mass density of the water (kg-m~°), p absolute viscosity of 
water (kg(ms)~') and d the diameter of the particles. The hydraulic radius is the ratio between 
the wetted area and wetted perimeter, r = (md*/4)/(md) = d/4. Therefore, h/L = 2nu/(gr). 
The number of particles is n = Vy/V;, and the total wetted surface area of solids is Ay = nAj. 
Therefore Ay = (1 — €)(d?)/(1d?/6) = 6(1—)/d. Then, replacing the factor 6 with the shape 
factor s, r = ed/[s(1 —)]. Because v,A, = vrA;/R, where p and f means pore and filter surface 
respectively, R is a constant which accounts for friction loss, and also J = 1/R, therefore we have 
h/L = 2nvp/ (gr?) = In(1 — €)?v5s?/(ge%d?). 

Kozeny used the ratio V/A = d/4 for a cylinder and the porosity p = V,/(V. + V,) and 
gavethe equivalent cylindrical diameter for a packed bed as d, = 4pV,/[A(1 — p)]. Then the average 
velocity through the channels is up = dup/dt = [(V2AP)/(2A?ml)(p/(1 — p))?], where | is the 
channel length. The Carman-Kozeny equation accounts for the tortuosity of the channels in the 
bed, s? = 2.5p3AP/(2pnlu(1 — p)”), where V,; = m/p, the specific area s = A/m and p the solid 
density of the powder. The determination of the phases and composition of a powder is done by 
x-ray powder diffraction, thermogravimetric analysis and differential thermal analysis. 
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Wet methods are preferred when preparing material before firing in order to control agglom- 
eration during forming, for otherwise when the particles are aglomerated the narrowest particle size 
distribution becomes of little or no help. In wet forming, solid particles are suspended within a liquid 
the chemistry of which can be adjusted to make them mutually repulsive or mutually attractive, 
for respectively deflocculation and flocculation. Stabilising makes particles mutually repulsive either 
by adsorbing polymer chains on to the particles in steric stabilisation or by putting charged ions 
or polar molecules on the particle surface in electrostatic stabilisation. In steric stabilisation, one 
end of the long polymer chains, which is hydro- or lyophobic, is adsorbed on the particle while the 
remaining end, which is hydro- or lyophilic, extends in to the liquid. 

Electrostatic stabilisation results in diffusive double layer built around particles. Zeta potential 
measures the repulsive potential between particles travelling in a medium. It defines the electrical 
potential in the double layer at the surface of shear slippage when the particle is forced to travel 
through the fluid when an electric field is applied. The composition and thickness of the double 
layer can be changed by adjusting the pH of the suspension. The point where the pH gives a zero 
zeta potential is called the isoelectric point. It is a point where spontaneous agglomeration occurs. 
The electrophoretic mobility ve = u(E)/E = Ce,€o/(frn), where u is a steady state velocity, fr a 
constant determined by the dispersing medium and the particle size and 1 < f;, < 3/2. 


§ 5.6 Forces between particles 


Essential to the simulation of stochastic models of particles is the consideration of forces acting 
on each particle (cf Schumacher, 1996). Since in theory the forces acting between two particles 
extend their effects to infinity, one has to make approximations. The degree of justification to these 
aproximations depends on how the force in question vary with distance. 


In the case of the Coulomb force where the potential 

energy is u(r) = qigo/(4me€9e,r) and the force f(r) = 
—du(r)/dr is f(r) = 142/(4r€9€,r7), the justification 
is high as is seen in Figure 5.3 where the force-distance 10" | 
is a decreasing straight line on the log-log graph, qi 
and q2 are protons, and r the distance in metre. 


Figure 5.3 Coulomb force vs distance in log-log 


i i i i i i 
10° 10" 10° 10? 10" 10° 10° 10° 
scale.. distance/m 


The effects of the Coulomb force are prominent when sizes of the particles are small. In 
quantum mechanics where the scale is atomic, for instance, the problem becomes one in which there 
are a large number of particles interacting with one another, i.e. an n-particle problem. In theory 
the Hamiltonian operator can be applied and then the problem solved numerically. But in general 
this is not possible due to the too many particles involved in the calculation. Theoretical solution 
is possible by the various methods of approximation, for example the Hartree method (cf Brown, 
1972) where the best wave function is found in terms of the one electron function, i.e. orbitals, &, 
or a Hatree-Fock approximation which reduces the number of equations to n/2. 
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§ 5.7 Arbitrarily shaped particles 


An arbitrarily shaped particle in a divided space will necessarily have a harder time travelling 
around compared with a sphere even if, or rather especially when the space is a mathematical one. 
Small particles are roughly spherical, or so the lore of science says, but when one’s technology has 
led one down to the realm of dimensions in the order of those small particles, for instance the nano 
technology, then shape does matter a great deal and the universal spherical assumption can no longer 
suffice. 

This is only one of the reasons which justify the investigation into the cases where the ratio 
of surface area to volume is not a minimum. When physics and motion are involved, this kind of 
study can incorporate both the continuous trajectory calculation as well as the discrete raster grids 
of the digital visualisation technology. The best way to hold such data is as matrix maps or masks. 

The best and quickest way to define the boundary of an irregularly shaped object while allowing 
ease of investigation of its interaction with the surrounding is as raster outlines. To do this, I first 
investigated such outlines computed from the equation of straight line segments which make up the 
boundary of the object. Hereafter object boundaries are defined without loss of generality as straight 
line segments that link all the vertices together with no gaps. The first investigation is unsuccessful 
as it violates this definition by leaving many gaps, as can be seen in Figure 5.4 (a). The second 
algorithm calculates the grids from the coordinate axis along the direction of which the slope of the 
edge is minimum. But this too still leaves gaps along the boundaries. 


(a) (b) (c) 
Figure 5.4 Example of irregular object shapes, Kit in Anglo-Sazon’s runic script (cf Freeborn, 
1992) created by three different algorithms. 


The object shape is defined by a set of landmark vertices or corners. This must be listed in 
intended order, otherwise it would be impossible to deduce the order intended unless one assumed 
that the object is convex. 

There are three different programs in § A.22. Only the third one, tioa3.m gives a satisfactory 
result which leave no holes in the surface of the objects. In the second program, tiao2.m, v is a 
data set which contains the number of vertices, the vertices, slope, map matrix and the object’s 
dimension. In tioa3.m, v is somewhat different. It contains the number of vertices, the vertices in 
real dimension, the grid dimension of the box containing the object, the vertices in grid dimension 
and the matrix map or image of the object. In order to exploit possible parallelisation, the last 
program ignores the warnings when there is a division by zero as this means that all the grid 
positions of the whole line can be operated upon together as a vector quantity. 

The third program operates as Algorithm 5.2 does. It utilises the same idea as that used by 
a child or an artist alike when they draw or paint. Drawing and painting are both one-dimensional 
process which seeks to produce two-dimensional results. Each pencil- or brush stroke travels along a 
path the direction of which has one dimension. Unless he uses a very thick brush, there will always 
be a possibility of gaps forming between stroke lines, which can be annoying because however small 
they may be one needs to use a great deal of paint in order just to cover them up. This problem can 
be overcome by painting along two directions, for instance perpendicular to each other especially 
when the person concerned is a child. At a first glance, or to a novice, this may seem a wasteful 
practice, especially with dear types of ink. But a little practice and experience will show that this 
proves in most cases to be more economic than painting along only one direction. And since it can 
be readily seen that painting in two directions perhaps already uses twice the amount of ink required 
to cover the paper, it follows that doing so in one direction only would use a great deal more ink 
than this. 


Algorithm 5.2 Particles or objects with arbitrary shape. 


nh 


(4,9) < find grid coordinates for (x,y); 
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find all vectors linking vertices; 
{p;} discretise these vectors into sets of points; 
for all intervals between consecutive p;’s do 
draw along y-direction to fill gaps; 
draw along x-direction to fill gaps; 
endfor 
Oo 


The problem of texture quantification is in the difficulty in expressing such quantity by a single 
parameter. Properties such as coarseness, smoothness, heterogeneity and regularity are finger prints 
of particles, and are the result of physical and chemical processes. By using fractal geometry, it is 
possible to describe quantities like texture. A fractal is a set whose metric properties can only be 
consistently illustrated with a dimension D > T,, where T is the standard topological dimension. 
We can express this dimension as D = T + (1 — H), where H is the codimension. Curves can have 
their roughness described. By giving a fractal number between one and two the space filling ability 
of the curves is established (cf Van Put et al, 1994). The first method defines the fractal dimension 
of a function in terms of the Fourier power spectrum P(w) = w-@#+); H and D are determined 
by doing a linear regression on the log-log plot of the observed power spectrum as a function of 
frequency. Another method defines fractal dimension in terms of how the variance of interpixel 
differences changes with distance; D is estimated from a log-log plot, a variogram, of the variance 
of increments versus increments o?(x) & x7. 

Techniques used for measuring sizes of particles include sieving, microscopic analysis, electronic 
particle counters, laser diffraction analysis, permeability-, sedimentation and elutriation methods. 
Usually arbitrarily shaped particles are characterised by a variety of methods. For a single particle 
this usually means transforming its property to the corresponding value of a sphere. A particle may 
be represented by a sphere which has the same volume, surface area, surface area per unit volume, 
or the area projected perpendicular to the flow direction. It may be compared with a sphere which 
has the same settling velocity in the same fluid, or a sphere which will just pass through a square 
aperture of the same size. Or its area projected on to the ground, when it is resting in the position of 
maximum stability, may be compared with that of a sphere in the same situation. To be consistent 
in one’s choice is more important than which choice one chooses from. The sphericity of a particle 
is defined as © = Af,/A,, where Aj, is the surface area of sphere which has the same volume as the 
particle and A, surface area of the particle itself (cf Coulson et al, 1991). 


§ 5.8 Non Poisson number distributions of particles 


Let us look at an aggregate of spherical particles whose average diameter is 200 + 50 pm, 
density p = 3.7, and the total weight one gramme. Assuming the gravitational constant to be 9.81 
kg-ms *. The overall weight is W = n-w, where w = pVq is the weight of each particle. The 
particles being spherical their individual volume is thus V = (4/3)ar? and their distributions by 
weight and by number are shown in Figure 5.5. 
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Figure 5.5 (a) distributions by weight, (b) distribution by number in normal scale and (c) with 
log scale in the y-azis. 


In particle size classification the separation size, Dso, is the size where there is an equal chance of 
particles being reported to the fine or coarse fraction. The grade efficiency curve is normally plotted 
between the weight fraction to coarse product and the normalised particle size D/Dso. The choice of 
classification equipments depends on many factors, for instance the size of the particles in question 
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and their electrical or magnetical property. For fine particles, Treasure (1965) discusses several 
types of classifier, namely the solid-bowl centrifuge, the Hosokawa micro-separator and the Head, 
Wrightson air classifier all three of which have Dso « ./¢/w, the hydrocyclone where Dso « 1/q°° and 
q x p°®, and the Alpine Mikroplex classifier where Dsy «x u/(wVV) where u and w are respectively 
the radial and tangential velocities and V is the volume air flow rate, and Dso « 1/w in practice. 


The distribution of bubble size in gas fluidised beds had been represented by various kinds of 
distribution, for example the log normal, Gamma and x? distributions. Rowe and Yacono (1975) 
preferred the gamma distribution of the volume, that is 1(V|m,n) = [1/(n™T'(m))] V™! exp(V/n), 
in its normalised form I'(v) = [m™ exp(—mV)V™—"] /I'(m). 


Sieve testing is affected to blinding materials, that is parts of materials under test which lodge 
themselves in the apertures of the sieve. To account for this Rose and English (1973) give a general 
rule of thumb which says that a particle for which @ < tan~! y will blind the sieve. Here @ is the 
angle that the line of reactive force exerted by the material on the particle, which is normal to the 
contact surface, makes with the horizontal plane. Then they give the empirical value of y to be 
approximately 20°, which results in @ < 0.3358 radians as being the criterion for blinding to occur. 
For a spherical particle this gives the ratio z/r = cos @ > 0.9441, where r is the particle’s radius and 
x half the minimum distance between two normal reactions which act on the particle. Therefore the 
radius of particles which blind the sieve must be such that r < 1.0592x, which corresponds to the 
aperture of 1.0592 times greater than the aperture if we assume that the aperture is 27 through out, 
or equivalently that the openning has its corresponding faces vertical. 


It would be of a theoretical interest to prove this equation 6 < tan~1 y given by them. Also, 


the angle of friction, 7, is not a constant but varies for different pairs of materials in contact with 
each other, as well as changes the value when we change the medium surrounding them to a different 
type, or even when the moisture content changes for that matter. All of this goes to say that the 
value 1.ldmin extensively used in chemical engineering literature is probably nothing more than an 
engineering rule of thumb based on two conjectures, one in the limiting value of 6, the other in the 
value of y. But it gives a simple and convenient criterion for use when doing computer simulations, 
which are nothing but means to visualise the conceptualised physics anyway. Other values of @nax 
should give the same qualitative result. We may, for instance, choose the coefficient of our dmax to 
be 1.02, corresponding to 6 > 1/cos10°, instead of 1.06 which corresponds to the @ > 1/cos20° 
used above. 


Since no explanation of the formula regarding 6 given by Rose and English has been given 
elsewhere, I arrive at my own derivation as follows. First, let us recall from our sixth form physics 
how friction can be described by either the coefficient of friction or the angle of friction, both of 
which are merely different sides of the same coin. The angle of friction is also known as the angle of 
frictional resistance, the internal angle of friction and the angle of shearing resistance. For clean sand 
it is approximately the angle of repose. It reduces with moisture content and is zero for saturated 
clay. For solid it is approximately the angle of inclination of the surface of one material at the point 
when a block of another material, placed on top of the former, starts to slide. This is precisely 
the method by which the coefficient of friction is determined. There are two different coefficients of 
friction for each pair of material, namely the static- and the kinetic coefficients of friction, the former 
having a slightly higher value than the latter, and both are defined as being the ratio between the 
limiting friction and the normal reaction, p = f;,/F. This gives rise to the formula for the friction 
being fy = uF, which is equal to mg sin 6 at the point when the object of the second material slips, 
@ being the inclination of the plane made by the first material. Therefore we have » = tan 6, where 
pis the coefficient-, and @ the angle of friction. 


Coming back to our formula in question, @ < tan”! . Figure 5.6 shows a spherical object 
sitting on top of an aperture in a sieve. From Figure 5.6, a+ 6 = 7/2. Without loss of generality, 
assume y < 7/4. Let u = tana, be the coefficient of friction at some critical value a,. Furthermore 
assume that a, is small, so that we can approximate yw by the angle of friction y. Then we have 
ae = tan-+y=tan1y. It follows that the particle will block the pore whenever a < ac, whereas 
it will pass through the latter when a = 7/4. 


Because we know from experiments that some of 

the particles does lodge against and blind the pore, 

there must exist some a, < 8 < 2/4 such that this Aes 
occurs. For the reason that the number of parti- ’ St 
cles that blind is empirically small we know that 4 \ 
B is small. Since we already have the relationship ; \ 
among a, 9 and 7/4, namely a+ = 7/4, and since 
a is also small from our assumption, then in or- \ ! 
der not to unnecessarily introduce another param- \ a) : 
eter into what necessarily already contains some --------- Q------ Ag IS 
error due to all the approximations so far made, 
we let 6 = a,. Now we may say that the parti- 1 O 
cles will blind if and only if 90° -a, =90° -—B < 
a < 90°. For other remaining values of a, viz. B. 
both a, < a < 90° and a < ae, in other words \ 
0<a< 90° —a,, then, particles must block. But : 
@ = 90° — a, therefore the particles pass through : 
when 6 = 0, blind when 0 < 6 < ae and block Ol, x 
when ae < 6 < 90°. So the blinding particles TAk ‘ 
have 6 < a, = tan~!¥y and the approximation is seer 0(@) 
explained though not q.e.d.’ed. a1(0) eae NM 


Figure 5.6 Spherical object on a sieve. 


Let A, be the available area free from blinding material at some instant, A the physical area of 
the sieve cloth, G the area of cloth blinded by a unit mass of blinding material, and wo and w the mass 
of blinding material on the sieve respectively at ¢ = 0 and at some t > 0. Then A, = A—G(wo —w) 
and dw/dt = —kiwA,g, where ky, is the diffusion coefficient, and then dw/[w(b+w)] = —adt, 
where a = —kiG and b = (A/G) — wo. Assume b 4 0. At ¢t = 0, w = wo. It follows that 
w = [bwo exp(—abt)] / [b + wo(1 — exp(—abdt))]. 

Furthermore, let W be the total weight of material on the sieve, W.. the residue on the sieve for 
a theoretically infinite time of sieving, and K a constant. Then, dW/dt = —K(W — W..)Aa, and it 
follows that dW/(W —W,,.) = -—KG(b+w)dt = —K Gbdt— K Gb exp(—abt)dt/(q—exp(—abt)), where 
Q = (b/wo) +1. Again assume b 4 0, and W = Wo at t = 0. Then, In[(Wo -W.)(W - W)] = 
K {Gbt + (G/a) ln [(((b/wo) + 1) — exp(—abt)) /(b/wo)]}, and then W = W,, + (Wo — W..)5, where 
= b/wo = (A/Gwo) —1 and 6 = [exp(aAwot)(A + 1)/A - 1/Imay “9. When the total amount of 
blinding material is sufficient to bind the sieve completely, A/Gwo <1 and so —1 < A < 0, when it 
is exactly enough to completely glind the sieve, \ = 0, otherwise A/Gwo > 1 and 0 < A < co, Guo 
being the area of sieve cloth which will be blinded by all the blinding material present. At t > oo, 
6 =0 when 0A < w and 6 = (—A)*@/*, a positive fraction, when —1 < \ < 0. 

6 


§ 6. Filtering membranes 

Tanemura et al (1983) give a good algorithm which is both powerful and simple for constructing 
the three-dimensional Voronoi tessellation. The circumcentre of a DT being a vertex of the VT and 
the circumsphere of a DT being empty, this second condition of which is known as the contiguity 
condition, they arrive at an algorithm which works for both nondegenerate and degenerate cases. 
Algorithm 6.1 summarises their algorithm. Associated with the atom i, let V; be the polyhedron, 
vu, vertex atoms of V;, and S; set of atoms surrounding 7, $; D v;. Here H;(af|7) is the half-space 
determined by {i,ia,ig} and does not contain i,, 5;(aB|y) CS; C Hi. 


Algorithm 6.1 Voronoi construction in three dimensions, Tanemura et al (1983) 


find i,, nearest, and thus contiguous, to 43 

C; oa 413 

find j = i2 s.t. {i,i1,i2} has the minimum circumradius among all {i,i1, j}, 9 € 54, § A t1, t23 

Cy ig UC 

find j = i3 st. {i,i1,i2,i3} has the minimum circumradius among all {i,%1,i2,j}, j € Si, 
JF t1, i25 
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Vie {i, 41, 12, ighs 
Cy ig UC 
clear {mq} and {las}; 
atl; 
for all ig € C; do 
ifm, = 1 then 
atatl; 
else 
find {i,ia,ig,i,} € T;, which has {2,i,.} in common and where lag = 1; 
Si(aBly) — SiN Hi(aBly); 
describe a circumsphere to each quartette {i,i.,i3,j}, where 7 € Si(af|y) and m; #1; 
find jmin for which the centre of the circumsphere of {7,%.,ig,jmin} has the minimum 
signed z-coordinate value among all circumspheres obtained, z-axis being normal to {i,ig,i8} and 
lies towards the side of Hi(a/|y); 
Tye {i, ia, iB, is} UT; 
if 46 ¢ Cy do 
Cy — 15 UC; lag +45 las + +5 as + +3 Iga +43 lea + +3 leg + +5 
endif 
if all {J.} are equal to 2, ma + 1; 
if all {1g} and/or {Is} are equal to 2, mg «+ 1 and/or ms < 1; 
endif 
endfor 
find geometrical quantities of T1;;) o 


Algorithm 6.1 is justified by proofs of theorems which confirm that atoms nearest to each 
other are contiguous to each other, a triangle with the minimum circumradius is a face of a DT, 
which means that all its three atoms are also mutually contiguous, likewise a tetrahedron with the 
minimum circumradius is a DT, all its four atoms are mutually contiguous, two DT’s sharing a plane 
have their fourth vertices at a signed minimum distance on either side of the plane they share. Some 
interesting geometrical lemmas help towards the proof of these theorems. 

Jackson (1994) studies porous media and represent them using Voronoi models. His interests 
are in the synthetic membranes, which can be symmetric or asymmetric, homogeneous or heteroge- 
neous structure, neutral or charged, and passive or active transport. The resistance to mass transfer 
is mainly in the top layer if it exists. This is a dense layer 0.1-0.5 wm thick which lies on top 
of a porous sublayer 50-150 ym thick. Regular tessellations in two dimensions come in 11 distinct 
tilings called Archimedean tilings. Tessellations by random lines in 2-d have the equation of the lines 
xcosé+ysin@—h = 0, where 0 < 6 < m7 and —co < h < ow, which is analogous to tessellations of ran- 
dom planes in 3-d with the equation of a plane «sin @ cos¢+ y sin 6 sin é+zcos6 =0, where0<¢< 
mw. The definition he gives of the Voronoi polygon is gre jH (x;,2;), where the half-plane H (x;, x;) is 
{x € E?|d(x,x;) < d(z,2;);i #j}. The bisector is B(a;,x;) = {x € E?|d(x,x;) = d(x,2;)}. There 
are ne + np — 2 triangles in the corresponding Delaunay triangulation if in the Voronoi tessellation 
there are n, interior- and n, boundary polygons. Scanning electron microscopy is explained and 
several SEM pictures of cellulose nitrate are given. AVS is used to do the pore perimeter calcula- 
tion by connecting the modules read any image with image measure and image viewer, the latter 
two of which are in turn connected together. To calculate the pore area connect read any image 
with sketch, histogram, and image viewer. Then connect sketch with histogram, sketch with 
image viewer, and histogram with print field. A 3-d process is a homogeneous Poisson point 
process if the number of points in any region of volume V has a Poisson distribution with param- 
eter AV and the random variables corresponding to the number of points in disjoint regions are 
independent among one another. Among the characteristics calculated are, in our terminology, the 


e = f t,é oan 
perimeter of polyhedron P, = }7j2, 2, the surface area Ap = ))j2; 0j£1 4;°"", and the volume 


is Ve = as ey V,°"’. His numerical results given (see also, Jackson et al, 1999) are n¢ = 
5.203390, n& = 39.191489, n? = 26.127660, nf = 15.063830, P. = 17.358196b, A. = 5.9109970?, b? 
being the mean cell volume; the coordination number is of course 4. The distribution of n? shows 
the distinct Voronoi characteristic of containing exclusively of even numbers, whereas that of né the 
equally distinct characteristic of being exclusively in multiples of three. This has been explained as 
odd number implying an impossible fractional number of edges, there being 3/2 edges as there are 
vertices. For the cross section data he found n¢ = 5.831 and P, = 3.563s, s” being the mean polygon 
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area. In membranes, if the diameter of a particle is less than that of a pore then the particle will 
entrain the pore unless it should encounter other fouling particles, but if the particle is bigger than 
the pore then it will be retained. He assumes fouling particles to be spherical. Ascribed to each face 
is the diameter or size of its largest inscribed circle. Algorithm 6.2 is used for this purpose; d is the 
largest inscribed circle diameter sought for. 


Algorithm 6.2 Find the largest inscribed circle 


d+0 
for all combinations of three edges of the face 
find the corresponding triangle 
find the largest inscribed circle of this triangle 
if the centroid lies within the face then 
if the perimeter lies within the face then 
if the diameter > d then 
d< the diameter 
endif 
endif 
endif 
endfor o 


In carrying out his simulation, the mean particle diameter d, is calculated from the mean pore 
diameter d, by dp = kd, where k is a constant. The corresponding standard deviation of particle 
sizes is op = 0y(d,/d,). The distribution of particle diameters is dependent on both k and another 
dimensionless parameter m = (o,/d,)/(o,/dy). Then the central limit theorem gives the frequency 


distribution and thus the diameter of the i‘ particle as d; = dp + op (oe rj q/2) /Ja/ 12), 
where 0 <r; <1 are random variables and q > 12. Interaction between particles and membranes 


starts from Algorithm 6.3 which has been adapted from Jackson (ibid.). 


Algorithm 6.3 Interaction between particles and surface pores. 


while another particle exists do 
iit]; 
pi < particle ; 
find particle entry coordinates; 
c; < of the nearest Voronoi cell; 
fi < the nearest face of cj; 
if the face is fouled then 
for all the neighbouring faces f; 
if f; is not fouled then 
{fh = fii 
endif 
endfor 
else 
Leas 
endif 
if {f} is not empty then 
j< 0 
while particle travels and j < |{f}| do 
JIOIt+) 
if d, > d; then 
if the centre of p,; lies outside the largest circumscribed circle of f; then 
fi < the neigbouring face f; of the adjacent cell; 
endif 
if dp > 1.1d; 
particle cakes or blocks surface; 
else 
particle blinds surface face; 
endif 
else 
particle enters membrane; 
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endif 
endwhile 
else 
particle cakes or blocks surface; 
endif 
endwhile D 


Backflushing the membrane may clean blocking- but not blinding particles. Once inside the 
membrane, each particle independently and randomly walks until it can get out of the membrane or 
can go no further and thereby necessarily fouls a cell. The interpretation shown here as Algorithm 
6.4 is an adaptation of that given by Jackson (1994). 


Algorithm 6.4 Interaction between each internal particle and the pores. 


for each internal particle p; 
{c} pores to enter; 
jel 
while j < |{c}| and p; has not entered a polyhedron do 
find pore to enter; 
if the polyhedron is fouled then 
particle enters the polyhedron; 
if there is no space in the polyhedron then 
particle blocks or blinds pore; 
endif 
endif 
ictitl 
endwhile 
endfor o 


On the cake, the particles drop, roll, or nest among one another. The cake formation is 
described as Algorithm 6.5 which closely follows the description which he gave. 


Algorithm 6.5 Particle cake formation by Jackson (1994) 


while next particle exists do 
pi < next particle; 
if route not directly leads to surface face then 
p; and p, collide; 
find rolling path; 
if p; does not roll off then 
p; and pz collide; 
if p; does not roll off then 
p; and ps collide; 
p;, comes to rest; 
endif 
endif 
endif 
endwhile o 


Fifty particles is the empirical rule of thumb for the number of neighbouring particles to 
consider at the surface and cake level. Good care has been taken by his program to ensure that no 
two particles within this set overlap. All of his particles are gentle for they bounce not but often roll, 
for these no hard billiard balls but mathematical particles with assumptions. In this way a spherical 
particle would first vertically drops, then touches another particle and starts rolling off the latter 
along its surface. Once the two particles are abreast with each other they part. A dropping particle 
can either roll off one- or simultaneously two particles at a time. Rolling simultaneously off three 
particles is not physically possible. For if we picture i meets 1, rolls off 1, meets 2, starts to roll 
simultaneously off 1 and 2, and then meet 3. At this point it can either choose to give up 1 to roll 
simultaneously off only 2 and 3 or, it nests on the cradle of 1, 2 and 3, and thereby stops. There are 
three phases or layers associated with this membrane packing model. These are the cake-, surface- 
and internal layers. For the internal layer the thickness is limited by the membrane thickness, for 
the surface layer by the maximum diameter of the dropping particles, and for the cake layer by 
their amount and sizes. The flux decline across the membrane model is calculated by Algorithm 6.6. 
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Here C’, is the particle concentration, Pp initial pressure, Pz final pressure, J,, initial volumetric 
flux rate, that is to say, clean solvent flux for membrane, d diameter of the circular membrane, n 
the number of particles to be dropped on to the membrane in this simulation, LZ the depth of the 
packing retion, d, the mean spherical particle diameter, the solvent viscosity, €, the free volume, 
that is to say, the ratio between the volume of voids and volume of bed, v initial velocity of the 
fluid, P,; pressure between the cake and the surface fouling layer, Ri the pressure-flux relationship 
for the particles in contact with the membrane, R the pressure-flux relationship of the membrane, 


Algorithm 6.6 Flux decline across the membrane model. 


define At, C,, Po; 
ve (4/0) JIm/@; 
t< 0; 
while simulation should last do 
tctt+At; 
n¢ f(At,t, Im); 
find the packing density, dimensions and number of particles of the cake; 
find the packing density, dimensions and number of blocking- and blinding particles 
of the surface fouling layer; 
find the packing density, dimensions and number of blocking- and blinding particles 
of the internal fouling layer; 


72 3 
P. < the pressure drop across the cake calculated from v = Po“ Pe ) Soo 
P= P = Bp: 


P, < the pressure drop for the surface layer; 
P; < the pressure drop for the internal fouling particles; 
Rie Se 
Rot Ry + R; 
Im — P,/ Ra; 
endwhile o 


Fluz is the rate of flow by weight. The number of particles per second is obtained by 
multiplying} the concentration by the volumetric rate. And if we divide this by the area of the 
membrane we get the number of particles per second per unit area. The random walk of particles 
during removal by backflushing is shown here as Algorithm 6.7. 


Algorithm 6.7 The random walk of particles during removal by backflushing 


remove cake and all surface blocking particles; 
while next particle exists and backflushing do 
backflushing < false; 
if not blocking then 
remain blinding; 
if there are more particles in cell then 
blocking < true; 
else 
no more particle; 
backflushing < true; 
endif 
else 
blocking < true; 
endif 
if blocking then 
do 
if cell inlet pore unfouled or fouled and the particle passes through adjacent pore then 
move into the next adjacent cell; 
else 
remain blocking; 
backflushing < true; 
endif 


{ It is possibly a typing error in Jackson (1994) when he says dividing instead of multiplying here. 
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while the particle is still within the membrane enddo 
particle has left membrane; 
backflushing < true; 
endif 
endwhile oD 


Filters are sometimes made of non-woven materials, in which case they are modelled as tessel- 
lation by random straight lines. Wilkinson et al (1986) studies this type of filter by modelling it as 
intersecting random rods. The position and orientation of a rod is defined by one point, an angle 
0 < 4; 180° and the diameter of the fibre d;. The free area is ¢4 = (A — )> A,)/A, where the total 
fibre cross sectional area is 7 As = 30, lidi — Yom Don Oi did; cosec 6;;, where 1; is the length of the 
fibre, 6;; is 1 if lines 7 and j intersects and 0 otherwise, 0;; the angle of intersection of the fibres. 
Their model worked well for small fibre diameters compared to those of the particles. 

Algorithm 6.8 rewrites their method in an algorithmic form. Here 0 < rj; < 1 is a random 
number with uniform distribution, d, the critical diameter, that of a circle which just fits the inside 
an irregular polygon. 


Algorithm 6.8 Non-woven fibre simulation, Wilkinson et al, 1986. 


for all particles i do 
dj d+oa()), re — 2/2)/fR/12; 
choose the particle position 0< 2; < X and0<y, <Y; 
for each layer of the filter 7 do 
d; + the largest circle which fits inside the polygon; 
if d, > dj then 
the particle is retained at this position; 
endif 
endfor 
endfor 
Oo 


The fibre here is in the form of fibre matt, which stacks one upon another in layers. The 
equation for the volume ratio suspension to inlet of a fibre matt, V,/Vo = exp(—&n) where € is 
the mean capture efficiency of the filter, is similar to that of the concentration ratio in deep bed 
filtration, C/Co = exp(—K«a). The mean capture efficiency is related to the layer efficiencies by 
€=1-[(1-&)(1-&)---(1—,)]'”, and is dependent on d, o, €a, dy, of, where the subscript 
f means filament. 

Jafferali (1995) studies Voronoi tessellation and applies it to microfiltration. The program 
which he used to create the Voronoi structure has the algorithm of Algorithm 6.9. 


Algorithm 6.9 Construction of 3-d Voronoi network (Jafferali, 1995) 


find set S which contains m nuclei nearest to the nucleus point p; 
find the nucleus q which is nearest to p; 
find a nucleus r € S,r # q, such that the triangle pgr has the minimum circumradius, that is 
one facet of the Delaunay triangulation; 
do 
find s € S,s #r #4q such that the circumradius of the tetrahedron pqrs is minimised, that 
is a Delaunay tetrahedron 
find m,n,o € S such that m#n4O0A#qHzrF# 58 and the tetrahedra pgrmj, pqsn and 
prso all have minimum circumradii, these are also Delaunay tetrahedra 
until each triplet pp;p; is in two Delaunay tetrahedra, that is every face of every Delaunay 
tetrahedron containing p as a vertex is closed enddo 


To find the centre of the circumscribed circle of the triangle ABC, let IL4, Ilg and Ic be the 
planes perpendicular respectively to the sides opposite to A, B and C’. Respectively let n4, ng and 
nc be the vectors normal to Il4, Ig and IIg, and a, 6 and c the position vectors of A, B and C. 
Then II4, Ig and Ig will intersect at a point the position vector of whom is r which is obtained 
by solving the three simultaneous equations (r — n;)-a = 0 where i = A, B, C, ng = nc x Na, 
na =b-o, no =b-a,d=0.5(a +b), e=0.5(b +c). It follows that rz = [mi — (redy + 1242)|/az, 
Ty = Me + mr, and rz, = (m4 — me)/(m7 — ms) where my = r-a=a-ng,m2=7r-d=d-no, 
mg =7r-e =e€-Na,Mas = (Meaz — Midz)/(dyaz — dydz), M5 = (Azdz — dzaz)/(dyaz — dydz), 
Me = (M3az — M1ez)/(€yGx — Gyex), and M7 = (azz — €zAz)/(€ydz — Gyez).. The centre p of the 
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circumscribed sphere is obtained by solving the four simultaneous equations the first one of which 
is (py — Az)? + (py — Ay)? + (pz — Az)? =r? while the other three have B, C and D in place of A. 
Solving these we get pz = (m2z2—m4)/(m3—mM1), py = Mix +Ma2, pz = [2pz(Cx — dz) + Wy (Cy — dy) + 
ez — e1]/[2(d, — cz)| where m1 = [(az — be) (dz — cz) + (da — Ce) (bz — az))/[(Cy — dy) (bz — az) + (by — 
dy) (dz — Cz)], M2 = [(ea — €3) (bz — az) — (€1 — €2) (dz — €z)]/[2(Cy — dy) (bz — az) + 2(by — ay) (dz — cz)], 
m3 = [(dz — dz)(bz — ez) + (be — ce)(dz — az)]/[(cy — by) (dz — az) + 2(dy — ay)(bz — ea)lr Be eae = 
[(e2 - es) (de —az)—(e1 5 ca) (be = Ca) N2(Cy — by) (dz — az) + 2(dy — ay) (bz — ¢z)], €1 = a + ay + az, 
e2 = 0, +0) +02,e3=4 ++, andeq= “ +d) +d. Statistics obtained from his siteulation 
include n¢, ee ses NE; eu ieter of polyhedron, area of face, and volume of polyhedron. The 
number of faces and the number of edges are found during face construction the method of which is 
Algorithm 6.10. 


Algorithm 6.10 Find faces of a polyhedron, Jafferali (1995). 


find the set of all the n vertices of the polyhedron, {v}; 
for all combinations of three vertices vi, v; and vz of {v} do 
find the plane II which contains v;, vj and vx3 
if all the remaining vertices lie on one side of II then 
Ui, Uj, UZ together with all the other vertices which lie on II form a face; 
endif 
enddo D 


To find out whether all the vertices lie on one side relative to a plane, find whether the sign of 
the distance from each of these points to the plane » changes. This distance is d = pa-n = (a—p)-n 
where n is the unit normal vector, n = pa x be/|ba x be| = [(a — 6) x (ce — b)]/|(a — b) x (ce — B)I, 
and a, b and c form a plane while p is the point in question. To arrange the vertices of a face in 
cyclic order, first pick one point among them and then find the angle made by the lines from it to 
every two combination of the remaining vertices, by 8 = cos *[(0)0j - Up0;)/|Tpvi| - |OpU;|]. Two such 
lines which maximises the angle are both edges, and the angle from either one of them to each of 
the remaining vertices increases as we tread the edges from one vertex to another in succession. 

Nuclei points of the modified point process where d > dmin are generated by Algorithm 6.11. 


Algorithm 6.11 Nuclei points of the modified point process, Jafferali (1995). 


n; dmin} 
find p1; 
a1; 
while i <n do 
t-i=l; 
find pi; 
for j =2 to (i—1) do 
find d(pi, p;); 
if d(pi, p;) <dmin then 
a+i-|; 
endif 
endfor 
endwhile o 


The statistics that he found for these modidied Voronoi structures are shown here again in 
Table 6.1. 
dmin Me  min(ns) max(ny) min(n,) max(n,) 


0.0 226 «68 23 12 42 
0.2 218 8 24 12 44 
0.4 215 8 23 12 44 
0.6 226 «8 24 12 44 
0.8 229 9 21 14 38 
1.0 214 10 20 16 36 
1.2 204 = 10 20 16 36 


Table 6.1 Statistics of the modified Voronoi cells, Jafferali (1995). 


His asymmetric Voronoi tessellations have cell volume increasing with the z-coordinate position 
of the cell. The procedure for finding the dnin between two cells in such structure is described as 
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Algorithm 6.12. Here the volume ratio is 6 = Vo/Vi, and thus 6 = yo/y +1, dmin = mz; + c where 
m = (y —y1)/(z — 21). 
Algorithm 6.12 Asymmetric Voronoi tessellation, Jafferali (1995). 
5; 
ye); 
Yo + 63 
ce ON; 
m¢(1-c); 
dmin + k[(1—c)z +c]; o 
The statistics that he found are given for reference as Tables 6.2 and 8. Real numbers have 
been rounded to leave at most four decimal points to make it easier to read (cf Jafferali, 1995). 
point distribution 


Poisson modified asymmetric 

Ne 1276 1171 1069 

on? ~~ 33340 29946 27749 

ne 26.1285 + 6.4207 25.5730 + 3.5573 25.9579 + 3.5301 

yo r§ 50072 44945 41643 

ne 39.2414 + 9.6235 38.3817 + 5.3317 38.9551 + 5.2740 

yi, ni 19284 17341 16032 

ni 15.1129 + 3.2114 14.8087 + 1.7821 14.9972 + 1.7514 

Vi 0.60730? 0.6582b° 0.591263 

Vv. 4.76 x 10-4b342 x 1074 5.62 x 10-4b346.8 x 107-4 5.53 x 10-4b346.0 x 1074 

>; pi 641.3870b 664.1398) 554.01 

De 1.0053b+0.2290 1.1343b+0.1058 1.0365b+0.3255 

>); 4: 40.99306? 44,2189}? 36.4954b? 

Ac 0.032107 0.037807 0.034107 
Table 6.2 Comparative Voronoi statistics, Jafferali (1995). 

distribution 
Poisson modified asymmetrical 
min max min max min max 

V 88x10-50? 14x10-3b? 3910-40? 84x 10-4b® 9.9 10-50? 3.7 x 10-3 
nt 7 28 10 21 10 21 
n& 15 78 24 57 24 57 
ne 10 48 12 34 12 34 


c 


Table 6.3 More comparative Voronoi statistics, Jafferali (1995). 


The Voronoi domain created has ragged boundaries due to polyhedra protruding. The method 
used in his thesis is to slice the domain by a horizontal plane and then redefine those vertices and 
edges on that plane and at the same time reject everything above it. This is more similar to a 
carpenter filing away at a block of wood than a stone mason choosing his stones. The volume 
of voids was updated by using AVS which does this by counting the number of pixels contained 
within a given area. Statistics of an asymmetric Voronoi structure were given. His study concerns 
with the simulation of dead end filtration and cake formation. The particle size distribution is 
quantified in terms of the ratio of the mean particle diameter to the mean inlet pore diameter, 
a, and that of the standard deviation of the particle diameters to the mean particle diameter, /. 
The first parameter indicates the relative size between the particles and pores while the second one 
that amongst particles. Thus a > 1 would mean that the particles are bigger than the inlet pores, 
while 6 = 0 that particles are mono dispersed. The interaction between the particles and cake 
is essentially the same as that used earlier by Jackson (1994). The evaluation of pore properties 
described is equivalent to Algorithm 6.13. 


Algorithm 6.13 Pore property evaluation, Jafferali (1995). 


identify edge pores; 
identify inlet- and outlet pores; 
for all pores do 
find the largest inscribed sphere; 
for all faces of the pore do 
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find the largest inscribed circle; 
endfor 
endfor D 


Identifying edge pores amounts to first finding neighbouring polyhedra, and then finding for all 
faces whether each of them belongs to one and only one polyhedron. Finding neighbouring polyhedra 
amounts to finding for all polyhedra pairs whether each of them possess no less than three common 
vertices. 

Particles pass through a face into a pore if they could, but since they are spherical whereas the 
pores and faces are polyhedral and polygonal, the largest inscibed circle of the facet is computed. If 
the particles are irregularly shaped, they may fit through a polygon when challenging from a certain 
direction but not another. However, the assumption of spherically shaped particles provides most 
authors on the subject with an approximation both satisfactory and convenient, because then there 
is no need whatever to rotate them. Jafferali (1995) applies an algorithm equivalent to our Algorithm 
6.14 to find the inscribed circle for all faces. Essentially this involves computing an inscribed circle 
of a triangle arisen from every one of the possible combinations of three sides of the face. Then the 
largest one of such circles which lies inside the face is the inscribed circle of the face. Here a, b and 
c are the positional vector of A, B and C respectively; n is a unit vector from A to B, q normal 
to the plane ABC, and m perpendicular to both; s; are the sides opposite (x;,y;). From 3-d each 
face is transformed into 2-d in such a manner that A = (x1,y1) = (0,0), B = (x2, y2) = (0, y2) 
and C = (a3,y3). From c— a = x3m + y3n, 23 and yg are obtained; z — for Zentrum — is the 
centre (xz,yz) of the face in 3-d or its equivalent transformed centre (%,,%z); € is the nucleus of our 
polyhedron while €; its neighbouring nuclei. Then the k** combination gives the largest inscribed 
circle the radius of which is r,z. 


Algorithm 6.14 Inscribed circle of faces, Jafferali (1995). 


for each face do 
for all the ?C3 combinations j of sides of the face do 
R¢0; 
find A, B and C, the vertices of the circle formed by them; 
n € (b—a)/|b—al; 
m ¢ solve m-n=0, m-N =0, |m| = 1 and |n| = 1; 
q+ (b—a) x (c— a); 
{z1, Y1; x2} <- 0; 
y2 — |b—al; 
y3 + [(agny + ygny)Mz — (a3mz + Ngy3)My] /(NyMz — NgMy)} 
t3 [(a3mz + Nzy3) = Yy3nz] /mz3 
pr ey 835 
Se p/2; 
4 1/2 

ry [STEA(S-5)] /S; 
&, < (81%3)/p = (s1rg + $201 + $3%2)/p; 
&,  (siy3 + s3y2)/p = (siys + soy1 + $3y2)/D; 
Lz — £zMz + EzNz} 
Y2 — LzMy + EzNy} 
Bz ABC(az,Yz)3 
de |z—-&|; 
C1; 
for all €; do 

d; << |z = &\3 

if d; < d then 

¢ + 0; 

endif 
endfor 
if ¢ =1 then 

ifr > R then 

Re T53 
key; 
endif 
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endif 
endfor 
endfor D 


Algorithm 6.15 finds the inscribed sphere of each polyhedron. A tetrahedron is formed from 
each combination of four planes of polygonal faces. The largest of all the inscribed spheres of these 
tetrahedra is the inscribed sphere of the polyhedron. The intersection of bisecting planes Ni4_j Ti; 
is the facet in (3 — k mod(3)) dimensions which is equidistant from Il; and II;, 7 = 1 to k. Finding 
II = az + by + cz +d = 0 amounts to solving A-(B x C) for a, b, c and d. Finding intersection of 
planes amounts to solving their equations simultaneously. Here II; is the plane containing the i‘ 
face, II;; the plane bisecting II; and II;. 


Algorithm 6.15 Inscribed sphere of a polyhedron, Jafferali (1995). 


for each polyhedron do 
R¢ 0; 
for all the "C4 combinations j of the polyhedron do 
for 1= 1to4 do 


Atv} — U3 

Bev} -v}; 

Cevi-vuj; 

TI; (az, bi, cz, di) «+ solve A- (B x C) = 0; 
endfor 


find I],;; 7 = 2, 3, 4; 

pi — Mol} 

rie d(pi, Th); 

ifr; > R then 
Re T55 
ko Js 

endif 

endfor 
endfor o 


Particles move down vertically in discrete time steps towards the membrane. Upon reaching 
the latter, the i*® particle is greeted by an entrance the aperture of which is circular with radius 
re. If ry < Te it penetrates into the pore, if re < r; < 1.1r, it blinds and if 1.1r. < r; blocks 
the entrance. Blinded particles are not removed by reversing the flow. They become a part of the 
membrane. Reaching the membrane is by no mean their destiny, and the particles only begin their 
long and tortuous pelerinage hereafter by embarking on a random walk in the direction towards the 
centre of the earth. Each particle enters a pore via the face furthest away from the latter, and it 
leaves via the face closest to it. The position of a facet is that of its inscribed circle. If the lowest 
facet is not viable, the particle first repositions itself precisely at the centre of the inscribed sphere, 
and then either moves out from some facet lower than itself or, when all possibilities of travelling 
having been exhausted, become a residence of that pore. The repositioning part above may seem 
like a gross approximation, but there is no reasons why this should not make a sound assumption 
if we consider the fact that a real particle is never spherical in the first place. But if the particle 
blinds or blocks a facet, then the calculation used by Jafferali (ébid.) becomes more accurate. That 
is a = &+ Xz —&), where A = |d|/(|d| + Jal), lal = (r2 +12)? and d= |€ — z| —|a|. To summarise, 
a particle is in a perpetual search for a lowest facet, which of course is closest to the centre of the 
earth. This kind of study is important because it lets us know which part of the membrane is prone 
fouling by the particles. 

Non-woven fibres are simply stacked layers of material. Extra holes produced by needles which 
are used to increase their strength are difficult to model and are normaly assumed away before the 
simulation (cf Chan, 1990). Layers are considered as flat when the fibres which make them are 
considered to be flexible. Capturing of particles must take into account the separation between 
the layers as well as the usual aperture perpendicular to the flow direction. This is an example of 
man-made stacked 2-d layers. Examples in nature are numerous, including the honeycomb and cell 
growth in tissues. 

In his simulation, Chan (1990) represents random lines with (y — y;) = tan 6;(a — x;), where 
0 < 6; < a, a method of interior randomness. Other possible methods include the ~ randomness 
where the line is represented by x sina; + ysin a; = d;, where d; is the distance of the line from a 
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pole point p; which is usually taken as the centre of the area, and surface randomness where the 
position on the boundary of the area is chosen. 

Flow channels within a medium follows Poiseuille’s equation for flow within capillaries, Q = 
APnr*/8uAz, where Az is the length of the capillary. Darcy’s law relates the flow of a fluid 
through a porous medium to the overall pressure drop, AP = pLug/K, where ug is the superficial 
fluid velocity, LE the depth of the medium and K the permeability coefficient. The permeability 
coefficient for packed media, K = ¢*/ [K'S?(1—)*], where « is the voidage of the medium, S the 
specific surface and K’' the Kozeny constant. Particles can blind during both the filtration and 
the backflushing stages. The backflushing efficiency is the ratio between the volume of the particle 
flushed away and the total volume of particles captured in the media before backflushing.+ 


§ 6.1 Separation processes 


The largest aperture in the screen is the determining factor by which the selection is made, in 
other words it defines the size of the cut. This is a more logical argument than the one by which 
it is the mean aperture that defines the cut size (cf Rose and English, 1973). This largest aperture 
determins the smallest size of the particles retained on the screen. But in practice much smaller 
particles than these will remain on the screen for various reasons the most important one of which 
is blindings caused by particles with sizes dain < d < 1-ldmin. The factor 1.1 was first used by Rose 
and English (ibid.), and arises from the angle of friction y being approximately 20°. 

On a sieve at each instant, the area that is free from blinding material is A = A, — G(mo —m) 
where A, is the sieve area, G the area blinded by a unit mass of blinding material, m and mo the 
mass of respectively the blinding- and initial blinding material on the sieve. Also, dm/dt = —kmA = 
—km|As — G(mo — m)] = —am(8 +m), where a = kG and 6 = [(A/G) — mo]. 

In surface straining filtration the particles are larger than the pore size, in depth strining 
filtration both the pore and the particle sizes are commensurate to each other, and in adsortive 
filtration the particle size is smaller than the pore diameter. Adsortive filters can be made to have 
higher filtration efficiency, higher capacity adn higher flow rate than depth straining filters (Raistrick, 
1986). 

Examples of solid-liquid separations normally found in Chemical Engineering are filtration, 
sedimentation, flocculation, centrifugation, electro-osmotic and electro phoretic dewatering and hy- 
drocyclonic separation. Poole and Doyle (1965) listed some of the aspects in filtration which they 
thought need further investigation: the effect of rapid pressure increases on the approach to equi- 
librium porosity in cakes, for instance in rotary filtrations; the relation between drag forces on 
particles and particle arrangements and shapes; migration of fines within cakes and media; the effect 
of changing flow paths during washing on porosity. 


§ 6.2 Dead-end filtration 


Because membranes are porous media, the flux across them follows Darcy’s Law, j = Ap/(uR), 
where j = dV/(Adt), R is the hydraulic resistence, R = Rm +R. where R,, and R, are membrane 
and cake resistances respectively. Assume R,,, = 0, then R = R, = am/A, where a is the specific 
resistance of the cake, m the mass of the filter cake and A the septum area. 
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§ 6.3 The centre of gravity 


The formula for the centre of gravity of objects in general is cy = f rw(x)dx/ f w(x)dx. For 
a real object the theoretical procedure is complicated, since there is always the possibility that the 
density is not uniform, but the practical procedure is simple and straight forward, that is by simply 
hanging the object by strings in various positions and then find the intersection between the lines 
of string, provided of course that this is possible with the object. 

The centre of gravity is important whenever there is a gravitational interaction with an object. 
Both the translational and rotational motions of objects through space are relative to this point. 
The c.g. of a triangle is positioned at one third its height whereas that of a half circular disk is 
4r /3n from the straight boundary line. A c.g. always lies on the lines of symmetry when these exist. 
Other names for c.g. include geocentre, centroid and barycentre. 

The centroid of a triangle lies at the intersection of its median. That of a tetrahedron lies at 
the intersection of all the lines joining the vertices with the centroids of their respective opposite 
faces. Its coordinates are the mean coordinates of the four vertices. 

To find the centroid of a polygon, first tessellate it into triangles and find the centroid of each 
one of them. Then we have another system of point masses located at the centroids of these triangles, 
with the mass proportional to their respective areas. 

The centroid of a rod is at its mid point, and the weight of a rod is proportional to its length. 
This can be helpful when we want to find the centroid of a network of rods or tubes. 

The centroid of a quadrilateral is the intersection between its two bimedians. This is also the 
mid point of the lines joining the mid points of the two diagonals. 

The medians of a triangle which has its vertices at (a1, 61), (a2,b2) and (ag, 63) are the lines 
connecting these three vertices to the mid points opposite to them, the first one to (c1,d,) where 
C1 = (ag +a3)/2 and d, = (b2 +63) /2, and similarly for the other two. Their intersection is obtained 
by solving their equations, (di — b1)/(c1 — a1) = (y—01)/(@—a1), and so on. This gives the solution 
as being the average value of the vertices, [(}73 ai)/3, (03 0:)/3). 

Having mentioned the centroid, it is natural to add the other two points related to it. On the 
Euler line also lie the orthocentre, where altitudes intersect, and the circumcentre, where perpen- 
dicular bisectors intersect. 

Let aij be (a; — ai). Then for the orthocentre we need to solve any two of the three equations 
of the altitudes. For example, —a23/be3 = (y — b1)/(# — a1) and (y — b2)/(@ — a2) = —ai3/b13 can be 
simultaneously solved to give x = [a1 (a2bi2 + agb31) — (a2a3 + b21b31)b32| /(agbe1 + a1bg2 + a2bi3) 
and y = — [ag2(a1a2 — a2a3 + b2b31) + a31(a1a23 + b1b23)] /(agbe1 + a1b32 + a2bi3). 

Similarly the circumcentre can be solved from two equations, for instance (y—b1)/(a—a1) = m1 
and (y = be) /(x = az) = m2 where my = —ar3 /be3 and m2 = —ai3/b13, to give i b32(aza3 + 
bobs) /(agbe - ayb3) and y= a32(a2a3 + bobs) /(azb3 - agzbz). 


Figure 6.1 shows a 2-d Voronoi tessellation with its nu- 
clei and centroids. Ironically, the centroid represents 
the position of a cell better than its nuclei, because 
it positions itself in the most balanced situation rela- 
tive to the cell, whereas the nuclei does so with regard 
to its neighbours. The centroids are noticeably more 
evenly distributed than our Poisson nuclei. 


Figure 6.1 Centroid of the Voronoi tessellation. 


Because the centre of gravity is a property which has more to do with the individual cells than 
with their neighbours, there may be real situations in nature where the c.g. of individual cells in a 
network has a role to play. For example, it is usually assumed in a mathematical Voronoi tessellation 
that all the nuclei stay fixed and do not move. But in a real situation this would imply that there 
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are some nuclei which lie very close to the walls. As no such nuclei would be stable, they more likely 
move away, and in that case the most reasonable prediction is that they move towards the centre of 
gravity of the cell. 

Because they are stochastic in nature, computational VT could in theory take up any shape 
however awkward. Jafferali (1995), for instance, imposes constraints on the algorithm which creates 
VT’s, namely in the course of the generation no new nuclei can assume a position too close to those of 
the existing ones. Thus there is an excluded volume within the network which develops throughout 
the generation process, and the Poisson point process does not over the whole space. Again, this 
excluded volume is relative to the neighbours of the cells rather than to themselves. 

I suggest that an evolution centred around the centroids of a network can replace such constrint 
regarding the minimum allowable distance between two nuclei. And that this would be a more 
natural for a network to do because the nature of the procedure which makes it look inwards to 
itself, as opposed to being totally governed by its environment. An attractive feature of the movement 
of the nuclei towards c.g.’s is that the cells in effect takes into account not only themselves but also 
their surrounding, because, if nothing else, it was the latter who shaped their appearance in the 
first place. Therefore the nuclei would start to grow from a purely random position according to 
a Poisson point process. Then it would move towards the centroid of the cell, and as it does so 
the definition of its boundaries is also changed. The centroid is a stable position, as can be seen 
in Figure 6.2. Similar to the processes of covering, C’(V) introduced in § 6.3 on page X, and dual 
Voronoi, Y"(-) in § 6.3 on page 197, this centroid process can be recursive, that is G”(-). However, 
unlike the other two mentioned, this process very quickly becomes stable; Figure 6.2 (b) is much 
different from (a), whereas it is very similar to (c). The difference is in the size distribution as well 
as in the location of nuclei. The nonuniformity in the shape of a half-circle which can be seen in 
Figure 6.2 (a) is propagated to both Figure’s 6.2 (b) and (c), but it has become much fainter than 
in the original. 


Figure 6.2 Nuclei evolution towards a centroid; (a) a Voronoi tesssellation based on the Poisson 
point process, V, (b) the VT around its c.g.’s, that is G(V), and (c) the same process applied 
again to give the second order G?(V). 


The program in § A.20 finds the centroid of a Voronoi network and G"(-). 

There are three main steps in finding the centroid of a polygon. For each triangle of the 
triangulation of the polygon, first find the coordinates of its centroid, then its area. And then the 
centroid of the polygon is the weight average of the centroids of all the triangles. The first step 
involves finding the equation of two medians, which can be done by finding the mid point of an edge 
and then the slope to it from the opposite vertex. The second step can be carried out using the 
Heron’s formula which finds the area by means of edge lengths. 

Without loss of generality, let the polygon has n vertices at (a;,b;), where i increases from 1 
to n in the clockwise direction. Assuming that all triangles which triangulate our polygon share 
one vertex at (a1, bi), so that they all are Aj;,, where i = 1, k = j7 +1 and the three vertices are 
in the clockwise direction (a;,b;), (a;,0;) and (ax,b,). There are three medians in each triangle, 
corresponding to the three vertices, but we only need two in order to solve for the centroid. Any two 
of them will give the same result, but in order to fix the algorithm let us choose those medians going 
out from the vertices 7 and 7. Then, since there is no loop in the procedure, we can save the space 
by describing it here in linear steps as ¢; ¢ (a; + ay)/2, dj — (bj; + b4)/2, mi — (di — b;)/(Ci — a4), 
and the first median has the equation (y: — b;)/(x1 — ai) = m;. Likewise the second equation can be 
obtained as (y1 —b;)/(%1 —a;) = m,. Here the subscript of the centroid coordinates tells us in which 
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triangle it belongs. As the result of the above, we obtain for the k‘" triangle x, = (a; +a; + ax)/3 
and yx, = (bj +b; + b,)/3. 


The second step is to find the area. For this, we first find the edge lengths s,1 < (aj; + be )'/ Ze 
8h2 — (a5, +02,)/? and sx3 + (a2; + bz,)'/*, then the half-perimeter s_ < (81 + $2 + 8x3)/2, and 
then the area, A, = (4 (S$, = Sk1)(Sk = $K2)(Sk = 8x3))‘/?. 


The third step solves for the polygonal centroid (#,y) as & + (0, @rAk)/ >>, Ak and y & 
(0, yrAr)/ do, Ar- Notice that the first step is parallel to the second- but not the third one. More- 
over, finding c’s and d’s are parallel, as well as finding the various s,;’s. So we could vectorise these 
using parallel processing. But on Matlab I think all the matrix operations are already vectorised, 
so we only need to put all the components to be run in parallel in a single matrix and then do all 
the operations at once as a single operation on the matrix, provided that this is possible. 


The general algebraic solution to the above algorithmic procedure is obtainable by solving all 
the equations involved. This gives for any polygon the following theorem. 


Theorem 6.1. 


r= pa +a; + a4) (agbjn + aj bes + zo) / ; So (aibjx + ajbgy + a) (14),5 


K 


and 
y= re. + b; + by) (aabjx + a; bp: + ats) / ; So (aibjx + aj dni + a) : (15)yi 


Proof.: Assuming that we accept the centroid of a triangle to be at the mean coordinates among its 
vertices, and the centroid of massive point bodies is their average coordinates weighted by their mass, 
then when k = 1 it is obvious by looking at the Equation’s 6.14 and 6.15 that this theorem is true. 
Let us suppose that both these equations are valid for 7 triangles. We can present both of them in 
the form n/d where, necessarily, n = >, «;A; and d = >>, A;. If we now add another triangle to this 
cluster, the new triangle will also be represented as a massive point and it will add the terms zA to the 
numerator and A to the denominator, making n/d = (n+ @A)/(d+ A) = (Yog41) tiAi)/ Ug Ai 
Now, « for a triangle Ajj, is (a; + aj + a%)/3, and A calculated from Heron’s formula above is 
(aidjr + aj bei + aybi; )*/? /2, which yields Equation 6.14 and 6.15 for « +1. This proves both 
equations, and thus Theorem 6.1, by induction. D 


These general formulae, Equation’s 6.14 and 6.15, cover the triangle itself, when we consider 
the latter as a polygon, and the solution when k& = 1 in this case reduces to (z, y) being simply the 
average coordinates of the three vertices, which is the same as that we have earlier mentioned. 


Earlier we have seen the evolution of the nuclei towards centroids in two dimensions. Let us 
look at the same thing in three dimensions. For this purpose, the program of § A.19, which is used 
in § 6.5 and explained by Algorithm 6.18 in page 202, is still inadequate, as its list of faces contains 
considerable amount of duplicates. This would have increased the resources required to do further 
work here. Therefore the program has been adjusted to that in § A.21 for the described in the 
following. 


Similar to the idea shown in Figure 6.2, we draw in Figure 6.3 the VT’s in three dimensions 
whose nuclei evolve towards the respective c.g.’s. 
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(a) (b) (c) 
Figure 6.3 Evolution of nuclei towards centroids in three dimensions, namely (a) V?, (b) G(V?) 
and (c) G?(V3). 
This shifting in the nuclei positions preserves the mean of the size while cutting down its 
variance. The pictures in Figure 6.3 show how a 3-d VT transforms into its first- and then second 
order adjustment. If we plot the cell size distribution, we will come up with a picture similar to 


Figure 6.4. The appearance of the distribution where sizes are discretised into bins like this depends 
on the number of bins chosen. 
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Figure 6.4 Change in size distribution as a result of a nuclei adjustment process, (a) the size 


distribution of a V?, (b) G(V?) and (c) G?(V3). From a view point at 96° azimuth and 0° 
elevation. 


Figure 6.4 serves as a graphical presentation, but the statistics are the following. For our V?, 
G(V?) and G?(V?) respectively the cell sizes are 0.9345 + 0.4025, 0.9495 + 0.2652 and 1.0315 + 0.2086; 
the third central moment 0.0332, 0.0059 and 0.0061; the fourth central moment 0.0936, 0.0137 
and 0.0036. These means are only meaningful when considered relatively with each other, since it 
depends on how one chooses the normalising basis. Here the basis chosen is the volume for the 
original Poisson point process, which is 1, divided by the original number of generators, which is 
400. When we built this V?, 236 cells had been disposed of as they were thought to be those along 
the boundaries; when G(V?) a further 107 and finally when we built the G?(V?) 46 more. This leaves 
us with 164, 57 and 11 cells remaining respectively in our V?, G(V) and G?(V°), all of which are 
shown in that order as Figure 6.4 (a), (b) and (c). Of course a great part of these are hidden behind 
others, so you can not possibly see them all there. 

The sizes in Figure 6.4 are based on a volume magnification factor of 1,000, which is corresponds 
to the increase in size by a factor of three, but those in Figure 6.4 are based on a magnification 400, 
which corresponds to a factor of (400)!/? increase in the size. 

As the new program has considerably changed from the old one, I list it again in § A.21 which 
has evolved from that which is listed in § 8. Unless I am mistaken, wherever the sign © appears in 
this monograph it means copyleft not copyright. 
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§ 6.4 Molecular dynamics 


The Lennard-Jones function can be written u(r) = —A/r® + B/r!”, where A and B determine 
respectively the attractive and repulsive parts. Let the range parameter o = (B/A)'/® and the 
energy parameter ¢ = A?/4B, and the equation becomes u(r) = 4e [(a/r)!? — (o/r)®]. In other 
words, o is the diameter of one of the atoms and ¢ is the well depth, i.e. energy constant. The force 
here is not F = —du/dt = (24e/r?) [2(a/r)* — (o/r)®], but F = —du/dr. 

Another approach in molecular dynamics simulation is to use numerical methods on the New- 
ton’s equation of motion. The most widely used is perhaps the Verlet algorithm, shown here as 
Algorithm 6.16. The initial values are ro and ri. 


Algorithm 6.16 Verlet algorithm, L. Verlet (1967) 


for i= 1 ton do 
find fi; 
Teg — 274g — ya + f,At?/m + O(At*) and 
vs © (rig — Ti-1)/ (2A) + O(A??). 


endfor o 


There are variants and modifications of Algorithm 6.16, for example the Leapfrog Verlet 
algorithm which has three steps instead of two, that is Unyis2 = Un—1s2 + fn/mAt + O(At?), 
Patt =TnatUnqi/2Att O(At*) and vp = (Un41/2 +Un—1/2)/2+ O(At??); or the velocity Verlet algo- 
rithm where rp 41 = Pn+Un Att fr At? /(2m)+O(At?) and uns = UntAt(fn4itfn)/(2m)+O(At?), 
or in the form normally used in practice in which v,41/2 = Un + fnAt/(2m), rnya =Tn + Un4i/2At 
and Un+1 = Un + fn4i1 At/(2m). 

The van der Waals force is an attractive force acting between molecules. In the case of gases, 
each molecule consumes some space, so the dynamic volume is less than overall volume by an amount 
bn when 6 is a constant and n the number of molecules. Here b is Nav, where v is the volume slightly 
larger than the volume of each molecule of gas and Na the Avogadro number, Na = 6.022 x 10-28 
mol—!. The pressure of gas we see is the pressure of gas detected, which is less than the real pressure 
by F/A, where F = )° F; and F; = >> f;. Here i runs from 1 to n and j from 1 to (n — 1) in the 
same set of molecules. The reduction of the total force comes from all molecules, but this reduction 
from each molecule is in turn affected by those molecules around it. Therefore i 4 j and j runs from 
1 to (n — 1) as mentioned above. Suppose that each molecule attracts another molecule by a force 
a. Then, in a given volume V, F = Fi = 0,0, fig = Di(n — Na/V = n(n — 1)a?/V*. For very 
large n we can say that (n — 1) & n, and therefore (P + an?/V)(V — bn) = nRT. 

The nature of this mutual attraction between molecules, which reduces the pressure in gas, 
comes to light in the case of solids. The distribution of charges around a neutral atom in solid 
fluctuates in the time scale 7 < 10-'® s. This charge imbalance makes each atom behave as an 
electric dipole. This electric dipole has an electric field around it, which affects other atoms nearby 
and binds the two together. 

The electric dipole moment is p = ga, where a is a vector from the negative to the positive 
charge. The electric field around a charge q, has a magnitude E = q/(4meqr7). It acts on a nearby 
charge q2 with a force of magnitude F = u = qE = qiqe/(4m€or7), where u is the potential energy 
of the two charges. This force itself is the Coulomb force, and the electric potential around q: is 
u/qo, that is V = qi /(47eor). 

For an electric dipole, V = (1/(47€9))(¢/ri — q/r2) = q(r2 — 11) /(4neorir2). Sincea <r, a 
being of the order of the atomic size, rir2 © r?. Let @ be the angle between a and r. Then, also since 
a <r, we have rz —1r, & acos@. Therefore we now have V & qacos6/(4megr2) = pcos0/4neor? 
and consequently E, = —OV/dr = 2pcos6/(4meor?) and Ey = —OV/(rd6) = psin6/(47eor?). 

We neglect Ey for long-range interaction, and simplify E, to E, = a/r?. We shall hereafter 
use the terms dipole and atom interchangeably. If this electric field is produced by atom pj, it could 
induce in another atom po = aF&,, where a is the molecular polarisability of the second atom. This 
second atom will have an energy of interaction with the first one, u = —poE, = —aE? = —aa?/r®. 
This force is attractive. 

The repulsive force is more complicated, and is generally thought to arise from the Pauli 
exclusion principle and the coulombic repulsion of the electrons in the outer orbit. It is generally 
assumed to be either u & A/r'? or u & aexp(—r/p), where p is a range parameter (cf de Podesta, 
1996). 
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The Lennard-Jones potential is often written as u = —4e [(a/r)® — (o/r)'*], where o is a range 
parameter that indicates the approximate size of an atom and € an energy parameter that indicates 
the strength of the interaction between atoms. In other words, it is the minimum value of u. 


2 
The Lennard-Jones potential between two atoms | 


has the minimum value u = ¢ at r = 1.12250. 1st--| pend 
Figure 6.5 is a plot y = —4(1/a® — 1/x"*), where 
y = ufe and « = r/o. The force which the po- 


qhcanh : : : 4 


tential curve of Figure 6.5 acts on another parti- olsen ; 
cle is shown in Figure 6.6. The force produced \ 
by a dipole is calculated from F = —du/dr = 0 eT 


24(e/o) [(o/r)’ — 2(0/r)'3]. But in our units y = 
u/e and « = r/o above the equation becomes 


L \ 
\ 
\ i 
y = 24(1/2" — 2/x'%), which is plotted in Figure sip ee a eum 


6.6. 


Figure 6.5 Lennard-Jones potential. 


3 T T 


ob - 4 
Figure 6.6 shows that the force is zero at the dis- ib i ino | 


tance x = 1.12250 away from the particle. Closer | 
than this point the repulsive force increases rapidly  & | 
towards infinity. Further away from this point, $-' | ; 
however, the attractive force increases to a max- 
imum and then gradually dies down. This max- | 
imum force occurs when dz/dy = 0, that is at “37 | 
xv = 1.24450. -aL | | 


Figure 6.6 Force corresponding to the 


Lennard-Jones potential. a 1 Uns anes — Stak ie cee 


In gases, the molecules travel past one another so fast that they hardly notice the wells of 
negative energy surrounding other molecules, let alone stop and rest there. But even here the 
attractive force produced by these wells is probably what give rise to the term an?/V? in the van 
der Waals equation. Solid molecules, in contrast, hardly have kinetic energy and therefore prefer to 
sit in such wells of their neighbours, which is the reason why solids hold and neither flow as liquid 
does nor disperse like gas. 

The most cohesive structures of solids are crystals, where the Lennard-Jones potential cul- 
minates in a minimum cohesive energy of the lattice. This cohesive energy is U = Nau;/2. Here 
u; is the summation over all pair potential energies of Lennard-Jones type, ui = ae u(riz). Let 
Tij = Q4jTo, where ro is the nearest neighbour distance. Then U = —2¢N 4 [(o/r9)A6 — (0/10) A12], 
with the lattice sums being Ag = )7(1/a§;) and Aiz = )>(1/aj7). These lattice sums are calculated 
from the network structure in terms of infinite series that converge very quickly. 

To find the optimum value of o/ro we shall let 6 = o/ro and write differentiate dU/db = 
—2eN4(6b° Ag — 12b'' Ayo) = 0. As a result, rg = o(2A12/A6)'/6, the cohesive energy per mole 
U = —(Ag/2Ai12)Nae and the cohesive energy per molecule u = U/N4 = —(A2/2Ai2)e. 
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§ 6.5 Problem definition and algorithms 


Walls in a 3-d Voronoi tessellation are isomorphic to bonds that link between its cells. Therefore 
we can redefine the problem of a particle passing through the hole in a wall, into the cell chamber 
and out through a hole in another wall, and so on, as that of the passage of a mathematical particle 
through a tube that links between two cells, into a cell and out through one of the other tubes. In 
reality the solid parts which make up the partitions have thickness, therefore the holes through the 
walls will have a nonzero thickness and the volume of the cell chamber is smaller than that of the 
otherwise mathematical Voronoi cell. 

Each vertex of a Voronoi polygon has three walls of the latter attached to it. I find the centre 
of gravity} of thess three faces and link them together. This truncates the coigns and produces for 
each polygon its dual self. The next step is to link together the midpoints of all those edges of the 
polygon that have a vertex in common. The edges of this last polygon bound and define the void 
volume of the cell chamber. 

Next, the cross section of the hole within each wall is taken to be the area on the original wall 
which is bound on all sides by the second order covering lattice of that wall. 

The filtering membrane in this case is assumed to be isomorphic and homogeneous. The size 
of the particles is taken to be reasonably smaller than the void in general, so that the attraction 
between particles and the adsorption to the wall play a more prominent role than the physical 
blockages by individual particles. The particles are all assumed to be of the same size. 

Algorithm 6.17 is an algorithm to do filtration that is being developed. Here N contains the 
neighbourhood information 


Algorithm 6.17 Filtration in Voronoi tessellation 


(Va; Ca) + find Voronoi tessellation; 
d; + find Delaunay triangulation; 
N. € find cell neighbours; 
¢ + Cq which lie completely within [0, 1]°; 
Uv < Ug which belong to some c; 
o 


My work on filtering membranes results in another Voronoi algorithm and program which is 
different from the programs listed in §’s A.3 and A.4. Because it is also written anew from scratch, 
this new algorithm has nothing to do with the previous two as regarding the data structure and the 
logic of its method. It is given in § A.19. 

The current convention for variables is this. A single alphabet or entity means a list, for 
example c is the cell list and va is the list of all vertices original created. Another example is }, a 
structure for bonds which contains the list of the cells of bonds, the number of vertices of the face 
represented by each bond, the list and the map of these vertices, the ordered list of the vertices of 
each face and another list similar to this but cyclic, and the number of cells connected to each bond. 
Similar to the structure of b is that of bdr, or bg in Algorithm 6.18, which is a list of the bonds along 
the border, each of which is connected to only one cell. 

Two entities ry makes x of y, for instance vc is vertices of cells, which is a structure that 
contains the number of vertices of each cell and the list and the map of all these vertices. I try to 
preserve the space by creating a short but easy to understand naming convention. Also, the lines 
are put together, which means that the number of lines of the codes is more than what appears here, 
some of the lines having six logical lines or more to them. But the structure of the program still 
remains intact, therefore it should be possible without much difficulty to compare the program in § 
A.19 with Algorithm 6.18 which explains it. 

Three entities xy” or y? are y x y matrix of x, where the latter relates two entities of the 
former, for example bcc is the bonds mapped on to a cell matrix. In the algorithm, v, and cp are 
respectively the vin and cin in the program, the vn and cn there being verbosely described in the 
algorithm as the number of v and c. 


Algorithm 6.18 Voronoi data structure for the study of membrane filters. 


(va, v2) find a 3-d Voronoi tessellation; 
Un «+ index of 0 < ug < 1; 
Cn + index of c all the v’s of which are in v,; 


{ aka centre of mass, centroid. 
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U Ue E Un} 
Ue + UE E En} 
ta < find a 3-d Delaunay tessellation; 
for all t; € t, which are connected to two cells do 
te ty 
else 
ba < tis 
end 
beget; 
be ba 
find Delaunay triangulation in (3 — 1) dimensions for all faces; 
order the vertices of each face; D 


§ 6.6 Simplified algorithm for filtration 


The first algorithm we shall now develop is a reasonably simplified one. But it turns out to my 
surprise that this simple algorithm links us to the continuum percolation of hard spheres or even of 
particles with irregular shapes. This is because of the assumptions that we shall make. 

One such assumption is that the variance of the filter cell size distribution is small. For this, 
Jafferali (1995) would probably have applied his favourite constraint code on a Voronoi tessellation. 
But I have my own approach which I think is more logical, namely by using the operator G(-) on a 
V (cf § 8), which we shall use for now. 

The second assumption is that the particle size is reasonably smaller than the size of the 
smallest void of the original system. This is the very assumption which I think seems to link us 
somehow to the percolation of spheres in continuum, the space considered being that of each void. 

Also, we assume that the particles are attracted towards one another and towards the walls 
by various interactions which may include the van der Waals force and the force from electrostatic 
interactions. 

Let @ be the angle that the line from the c.g. of a each cell to the mid point of a face makes 
with the horizontal plane. Then another possible assumption is that all particles prefer a trajectory 
which goes through a face which has the maximum 6. 

The third assumption is that the volume of each membrane pore is 80 per cent the volume 
of the corresponding Voronoi pore. The fourth assumption, blockages due to the clustering caused 
by the attrition forces between particles can occur within pores. This excludes cake formation and 
blockage at entrances to, or exits from the pore. 

The last assumption above is similar to assuming that clustering due to attrition can occur 
in stagnation regions. Since the flow of the suspension reaching the membrane is strong, #.e. the 
pressure high, there can be no clustering there. The flow from one pore into another is also faster 
than the flow within one. This is amount to assuming that the effective diameter of the hole within 
each face of a pore is considerably smaller than its diameter. 

Upon reaching the membrane, each particle in the troop seeks out the bond closest to it, and 
begins its journey through the membrane. Within the membrane, it always follow the bond which 
has the greatest gradient available. Therefore the top bonds should map to the bottom ones one to 
one. But because the possible blockages during the course of operation, this may not be so and the 
mapping is instead one to many. 

First we consider the case in two dimension, so volumes becomes areas and the volumetric flow 
rate the distance travelled. In our discrete time, if v is the flow velocity, n the number of particles, 
pv the total volume ratio of the particles and r their radius, then we have nar? = vAt. Assuming 
that v = 1 ms~! and r = 100 wm, then n = 10°p,/z or approximately 318, particles for each time 
step. 

Next we will study the suspension in a square box in order to find out p,. Because we shall 
assume that the particles flowing through the pores percolate as though there is no flow, we will 
consider here the suspension that is simply contained within our box without moving about. I feel 
that the assumption that particles could percolate that way in pores is justified since the flow is in 
steady state, protected from the turbulence outside by all the solid structures making up the walls 
of the membrane. 

The percolation program first generates random positions of the particles, then moves apart 
those which are too close together so that in the end they only touch each other. Particles which are 
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separated by a distance less than 1.4r move towards each other until they touch. Lastly, touching 
particles never separate. 

We know that the total volume ratio of the particles has the upper limit of 0.9069, because 
that is the density of the closest packing of circles on a plane. 

Packing circles on the plane becomes densest when the circles are arranged as a hexagonal 
lattice with the packing density of 7/2,\/3. Packing of spheres is similarly at its highest density if 
the arrangement is that of the face-centred cubic lattice with the packing density 7/3V2. 


§ 6.7 Filtering problem when physical blockage is prominent 


Assuming particles to be spherical, the size of particles to be constant, and that this size is compatible 
with the size of the holes in the walls and the voids so that physical blocking is responsible for most 
of the blockages in the membrane. As in § 6.7, the hole in each wall is taken to be the polygon which 
results from recursively finding a covering polygon for the face twice. 

Redefine the problem of particles’ passage through walls and voids as that of particles travelling 
along edges of the dual lattice of the Voronoi structure, i.e. the Delaunay triangulation. Each of 
these edges corresponds to a face in the original physical lattice. To each edge is thus ascribed the 
details of the cross section of the hole through that face, namely the shape and the dimension, as 
well as the gradient it makes with the horizontal plane. Upon reaching a vertex, the particle ball 
will choose the next path, i.e. bond in the dual lattice, which has the maximum gradient to pass 
through. However, if this bond is too small or if it is blocked, the particle with choose from among 
the remaining paths the one which has the maximum gradient, and so forth. If the size of the particle 
is approximately that of the hole it tries to pass through, within two per cent of the latter, say, then 
the particle will blind the passage at that point. The difference between blinding and blocking is in 
the degree of tightness that the particle sits in the hole, which reflects in the degree of difficulty to 
remove it by backflushing. This degree is not constant but a function of the relative size between 
the two parties involved, #.e. the particle and the hole. 


§ 6.8 Percolative filtering with very small particles 


At this point a new filtering algorithm is considered and investigated. We introduce an assumption 
that the particles are all of the same size which is very small compared with the size of the pores. 
So there is neither cake formation nor blinding by a single particle. Assume that the solid particles 
suspended in a fluid medium, being dragged downwards under their own weight. 

Assume that the van der Waals force plays a signigicant part and, similarly to § 8, that these 
interactions between particles are governed by the Lennard-Jones equation. Assuming that each 
particle is spherical and acts as a dipole with the electric dipole p = 10e, where e is the electric 
charge on a proton, e = 1.602 x 10~'9 C. Then (ef de Podesta, 1996) 


Dp 
— dmegr?’ (16)¥i 
and the energy of interaction between two particles becomes 
2 
= 2s. OP . 
u=—ak, = Gmyerr® (17)vi 


where a is the molecular polarisability of one particle under the influence of the other. If we assume 
that the repulsive force acts in such a way that the repulsive energy is u = c/r!?, where c is a 
constant, the Lennard-Jones potential becomes Equation 6.18. 


ap c 


v= ages RE (18)yi 
Comparing Equation 6.18 to the form 
A B 
Ur = 5 + aa’ (19) vi 
we have A = ap?/((4m)*<2) and B =c. Or if we compare it to the form 
oO O \4< 
uy = —4e [(2)° - (2)""], (20) vi 


then we have o = (B/A)'/° = (16ene2/(ap))'/6 and ¢ = (A?/4B) = ap*/(4c(47)*e4). Notice 
that here o and « are simply parameters, not the Stephan-Boltmann constant and the dielectric 
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constant, o is arange parameter and approximates the size of an atom while ¢ is an energy parameter 
which shows the strength of the interaction between particles. At r = o the value of u, is zero, 
whereas u, has the minimum value of —e. 


The force between two particles is Equation 6.21. 


du 6ap" 12¢ 
Pe 2 Se 21) yi 
dr (Air)? e@r? * pis (21) 


At the equilibrium separation, ro, F = 0 and therefore Equation 6.21 yields the minimum 
distance in Equation 6.22, 


1 
2 D9 6 
mm (Fa) , (22), 


ap? 


The equation for the minimum energy is obtained by substituting ro from Equation 6.22 into Equa- 
tion 6.18, which gives 


a Gaye . a (23) vi 
= z C aie “3 =) (24) vi 
= # (- aaa i Soe ) (25). 
- ~aea (26) yi 


Returning to Equation 6.21, the attractive force has the maximum value at the point where 
dF/dr = 0. Differentiating F in Equation 6.21 with respect to r, we arrive at Equation 6.27. 


dF 42ap? 156c 


ee an Ta eee 27 i 
dr = (4r)*e?r8 —r4 (27) 
From this the distance where this maximum force occurs is given by Equation 6.28, 
fire 156c(47)?eG 7 A16cn*e9 (28)y; 
mn 42ap? Tap? pe 


Then by putting Equation 6.28 into Equation 6.21 we have this maximum force in Equation 6.32. 


Gap? 12c¢ 
Fr = - os + (29) 
(4r)2e@r7 + 58 2) 

_ 1 (-6ap? = 12c(42)ap? (30).; 

~ rt \ (422 " 156c(47)2e2 “ 
9ap 

7 Spt en oe 

(32) yi 


Let each of the spherical particles has a radius r = 1 wm and the density p = 3,000 kg -m~? 
(compare the density of silicon, which is 2,329 kg-m~*). Then the mass of the particle is m = pV = 
3000 x (4/3) x (10~®)? = 1.26 x 10-4 kg and the weight is mg = 1.26 x 10-4 x 9.8 = 1.23 x 10-8 
N. 
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v(0)=0 
mg 
Y 
(a) Be 
( d —_ We may now find the attractive distance, the max- 
ae a imum distance whereby two particles will come 
, — together under the van der Waals force. Figure 
Tm 6.7 shows the capturing of one particle by another 
when one particle is fixed in space and another par- 
er ie , ticle has zero velocity but is free to move. Recall 
\ Ly ~~ that the capture occurs when the accelaration due 
(b) to the weight of the particle g equals the accelera- 
mg 


tion a due to f. 
Figure 6.7 Force balance with one particle fixed. 


If we suppose that our particle have the same polarisability as that of a benzene in its gaseous 
state, CgHge, i.e. a = 11.61 x 10~*°, then in this case a = 11.61 x 10-*4° F-1m* (ef de Podesta, 
1996) and Equation 6.32 gives us the separating distance between the two particles which gives the 
maximum attractive van der Waals force, which is 444 wm. Giving our particle other values of a, 
with the value of a for methanol gas CH3OH, i.e. a = 3.860 x 10-49 F-!m+*, we have this distance 
r = 379 pm, and with a = 1.647 x 10-49 F-'m+, that of water vapour, the distance becomes r = 
336 jum. 

These values are rather large compared with the radius of the particles, therefore I shall opt 
instead to a bigger size of particles, when r = 5 wm. With the radius of five microns, the particle 
has a mass of 1.571 x 10-1? kg and its weight becomes 1.64 x 10-1! N. Then if we adopt the value 
of a for water vapour, a = 1.647 x 10° 4° F-!m*, then from Equation 6.32 the distance where the 
force is maximum becomes r = 167 pm. 

But this is not everything. So far we have only considered what two particles will do when 
one of them is fixed and the other one has no initial velocity. There are two other things that can 
happen, the particles may both be moving down beside each other under gravity and the path of 
the particle which is effected by their mutual attraction. Even when two particles do not come 
together, their path can be deviated by the van der Waals force. But here for simplicity we shall 
neglect this and assume that particles either come and stay together or they experience no mutual 
force whatever. Only if they come together will their final path and velocity be affected, and these 
depend on their combined momentum. 

When particles move relative to each other, their captive velocity depends on their relative 
velocity. They tend to join each other more easily if their paths are along side each other and goes 
in the same direction. In the extreme case where both particles move in the same direction with 
zero relative velocity, they would come together across a vast gap in between indeed, had there been 
no frictional force due to viscosity that acts to drag them. 

In the present study, the friction due to the fluid in the medium is neglected, together with 
the relative velocity between the particles, for the purpose of deciding whether particles will come 
together. It is expected that on average particles coming to within the capturing radius of each other 
will come together. This radius is larger than the radius of maximum force in Equation 6.32 above. 
In other words, we expect our particles to behave like solid spheres with a well defined boundary for 
their sphere of influence and a much simplified capturing mechanism. 

We shall define this radius of captivity, r., to be one third that of the radius of maximum 
force r,. From Figure 6.5 this is the point where r, = 1.50, and because r,, is here 1.2445 we have 
Tc/Tm & 1.2. For Figure 6.5, this is the same as saying that r-/ro = 1.34. 

One additional point is that, in real situation when particles form a cluster their collective 
value of the molecular polarisability will change, and this value will not be the same for the cluster 
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as it is for the individual particles. But here we assume that they are the same, which means that 
the capturing radius of a cluster will be the same as that of the particles which form it. 

It may worth mentioning here that the molecular polarisability is related to an optical property, 
viz. the refractive index n,, by the relationship a = €9(n2 — 1)/n, where n is the number density of 
molecules. For gases n = P/(kgT), whereas for liquids n = Nap/m, m being the mass. 

Next we shall concern ourselves with clusters of particles thus formed. All clusters will be 
assumed to be a closest-conglomerate of particles which form them, with the densest packing density 
possible in three dimensions, that is 7/3./2 of the face-centred cubic lattice. Numerically this is 
0.7405. 

Notice that the packing density in two dimensions can be higher than this. Packing circles on 
a plane is the densest of all with its packing density of /2V3. 

Shown in Figure 6.8 are the hexagonal lattice pack- 
ing in two dimensions and the cubic close pack. In 
the cubic close packing spheres in every third layer 
lie vertically straight on top of one another. Each 


face of its cubic section looks like the second pic- a as 
ture in Figure 6.8. Similar to the cubic close pack- t 
ing is the hexagonal close packing spheres in ev- me Lye a 


ery alternate layer of which lie over one another. 
Both the cubic- and the hexagonal close packing 
have the same packing density which, in the case 
of the former, is calculated, from the second pic- ; 
ture, as p = >, vs/ >> Uc, where v, are the total vol- “fn es He Sb 
ume of sphere segments in the unit cell which has wee 

the volume ve. Here ve = (2V2r)? and lv, = ? \ 
(8(1/8) + 6(1/2))4r3/3. In two dimensions, the \ 
densest packing is calculated from the first picture. 
The density of the packing is }° a,/a,, where a, are 
the areas of the circles and a, is the area of a rect- 
angle. These two areas are namely a, = 2(mr7) and 
a, = 2r(2V/3r), which give the density p = 1/2V3. 
Figure 6.8 The packing density calculation of the 
closest-packed densities. 
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§ 6.9 Percolation within percolation 


Particles suspended in a fluid generally have their diameter d, much smaller than the pore 
diameter d, of a filtering membrane. Yet these small particles can cause blockages of the membranes 
due to attrition among themselves. Since in this case dp < d,, blockages due to blocking or blinding 
of the individual particles (cf Jackson, 1994; Jafferali, 1995) become out of question. 


Having investigated both the percolations of networks and continuum, I suggest that the block- 
age of these smaller particles in membranes is due to a double percolation phenomena, one the per- 
colation of the suspension continuum, the other the percolation of the centroidal Voronoi network. 
As a reminder of a centroidal Voronoi network, it is a Voronoi tessellation on generator points which 
are the centroids of a Voronoi network which either is generated from Poisson point generators or is 
another centroidal Voronoi network. 


Because percolation is a study of the behaviour of two phases, and because in general p, 4 1/2, 
there are no less than three regions of behaviours to consider in each percolational investigation 
instead of two (cf Tiyapan, 1997). When p, < 0.5, these three regions are p < pc, Pe < p< (1— py) 
and p > (1—p-,). When p, > 0.5, they are p < (l—p,.), 1—p.) < p< pe and p > pe. The case 
where p, = 0.5 is assumed to be very rare in nature, and so can be neglected in the present study. 


When a suspension becomes so high that the average interparticle distance has become such 
that the attrition due to van der Waals force is prominent, the suspension will solidify into a moisted 
bed of particles. According to the percolation theory, we may define the point where this spontaneous 
solidification occurs to be that point where there is a single cluster, under a mutual van der Waals 
force, which traverses the whole continuum in a certain well-conditioned direction, that is to say, 
a direction which may represent the diameter of the network. Furthermore, let us call a critical 
concentration p, the minimum concentration at which this infinite cluster appears. 


Then we have for our suspension a continuum percolation with three regions of behaviour 
similar to those we have found in the case of network percolation. Furthermore we map the space 
of pe on to that of 0 < p. < 1, where p, = 0 means there are no particles suspended in the fluid, 
in other word p = 0, and p, = 1 is where the suspended particles form a bed in the closest packed 
structure, that is p = pmax. We also assume, without the loss of generality, that p. > 0.5. Then we 
have the following as the three regions, p < (1—p-), (l—pe) <p < pe and p > pe. 


We are interested in neither the cases p < (1 — p,) nor p > pz, since the former implies too 
dilute a concentration for the attrition due to the van der Waals force to cause an infinite cluster, 
while the latter means that the suspension is so concentrated that they solidify instantaneously, 
simultaneously in all pores. 


When (1 — p-) < p < pe, all pores has an equal probability of being solidified, and so the per 
cent total solidified cells now depends on the topology of the network,in this case Voronoi, and the 
probability where the critical phase change occurs becomes the critical probability of the network. 


In the case of dead-end filtration the flow is in one direction, therefore the critical flux reduction 
which is the result of percolation of the network occurs at the point where the cross section of the 
network, not the network itself, percolates. This is because such percolation in the cross section 
in the plane perpendicular to the flow direction will cause a bottle neck in the flow and therefore 
determines the flux. This phenomenon is summarised in Figure 6.9. 
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Figure 6.9 Percolation within percolation; 0 < po < pmax, 0 < po <1, De = Deg * Po- 


Next we must define the critical probability of the overall system. Since the system involves two 
kinds of probability, that is continuum and network, and assuming p,, and p;, are two independent 
probabilities, then we have the overall probability is 


Pc = PoPc2> 
where (1 — pe.) < Po < Peo- 


(33) yi 
If our membrane is homogeneous, the reduction in the area perpendicular to the flow becomes 


AA = Ayp,,, where V,/Vi = Ay /Az, Vy and VY; are respectively the void volume and the total volume 
of the membrane, and similarly for the areas A, and A;. 
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§ 6.10 The first part, suspended particles 


Because of the complex nature of the problem, there is no single algorithm but rather there is 
an algorithm for each job. The first task is to study the percolation of the spherical particles under 
the van der Waals force. 

Continuing from the development in § 6.10, particles are spherical in shape with r, = 5 ym and 
the capturing radius is r, = 167 x 1.2 & 200 wm. First we shall study particles within a cubic box 
of side length 2 mm. Particles start as a suspension with no obvious velocity. They stick together 
and to the walls. 

When particles come together, they form a porous globule, having the densest packing density 
of the hexagonal or cubic close packing. When this happens, we discard the individual particles and 
consider instead the globular cluster which they formed. The cluster is porous, so its new radius is 
r = (n/3V/2)(3 d> v;/40)1/8 = (1/32) (8nv/4r)/3 = 17/3 (nv) 1/3 /(32/327/6), 

But we do not know the rules by which these particles stick themselves together, whether they 
form a closest-packed globule or some other shapes. It is quite certain that whatever shape they are 
after, they may not retain it for long because there is a limited space within each pore that will put 
constraints on the way they grow. I shall call the growth of clusters into globules mentioned above 
by the name globular formation. 

Other clustering mechanisms possibly include what I shall call the tetrahedra formation. By 
this I mean that each one of our spherical particles attaches itself to three other particles, forming a 
tetrahedron whose side lengths are two times their radius. The next free particle may fit into any of 
the available attachment sites, i.e. the free triangular faces of an existing cluster. We may suppose 
that it always choose the closest one among such sites if this is available; if not, then the next closest 
one and so on. 

These are only two among all the possiblities, namely the globular and tetrahedra formations. 
There could well be others, as well as a mixture of them. On the other hand, each material of 
which the particles are made may decide the particular cluster shape it prefers. Detailed analyses in 
thermodynamics and quantum mechanics are needed if we were to understand this cluster formation 
in continua under spatial constraints. Neither of these is within the scope and time constraint of 
the present work, though both of them merit a detailed investigation which I plan to carry out in 
the future. 

Another problem arises when we come to consider percolation of our membrane. We may, for 
instance, say that it percolates when its structure in three dimensions percolates, or we may say 
that it percolates if there exists a cross section perpendicular to the flow which percloates in two 
dimensions. Since percolation of a cross section implies percolation of the structure but not vice 
versa, these two definitions of percolation due to suspension in membranes are not the same. 

Choosing the percolation of sections as a criterion implies that we consider the superficial 
velocity of the flow whereas choosing the percolation in three dimensios as the criterion means that 
we focus on its interstitial velocity instead. 

The algorithms for the study of percolation by tiny particles due to attrition in membranes 
which I propose are Algorithm’s 6.19 and 6.20. Algorithm 6.19 prepares the structure while 6.20 
does the percolation simulation. Here both VT and V means the Voronoi tessellation. The appeal 
factor is the probability that a particle will choose to leave a cell via a certain bond. It is weight by 
the gradient of each bond, and is calculated over all bonds going in the downward direction from 
the cell. Transfer grids are square grids which help map the continuous plane at the top layer to 
bonds connected to it, that is to say, it maps a continuous Euclidean plane into discrete grids and 
from there on to bonds. In other words, E? — D? > {b}. 


Algorithm 6.19 Percolation by tiny particles due to attrition in membranes. 


generate a Voronoi tessellation in three dimensions; 
transform the VT into a centroid VT; 
find the cross section of its top layer; 
Ce Cv); 
find transfer grids of C; 
for every cell in VT do 
find the maximum chamber capacity of its cell; 
find appeal factors for all its bonds; 
endfor o 


Ph.D. Thesis, UMIST. K N Tiyapan. Chapter 6: Filtering membranes 


Let the gradient of each bond be represented by an angle a that it makes with the horizontal 
plane. Then the gradient can be calculated from the coordinates of the two end points of each bond, 
providing that z2 > 21, from a = tan~!(z12/((Aa)? + (Ay)?)!/2), where the slope is downwards from 
p2 to pi, and as usual z12 = zg — 21. Algorithm 6.20 describes the membrane percolation simulation 
proposed. 

Algorithm 6.20 Percolation by tiny particles due to attrition in membranes, percolation sim- 
ulation. 


for each time step do 
for all arriving particles do 
find their random arrival position; 
round these positions to the precision of the grids; 
map positions on to bond numbers, using the grids; 
endfor 
for all particles do 
update distance travelled; 
update chamber crowding; 
find percolation of blocked chambers; 
if chambers percolate then 
terminate the simulation; 
endif 
endfor 
endfor o 


Here I concentrate on the interstitial flow velocity, therefore the percolation is supposed to occur 
when the chambers percolate in three dimensions. Coincidentally, this also makes the calculation 
easier. If we were to choose the percolation of sections as the deciding factor for percolation of 
the membrane, for instance, we would have needed to consider approximately 2n sections in total, 
where n is the number of chambers. With an equal probability for success for all the homogeneous 
sections, this would still leave us on average n sections to consider before we know that a sample 
percolates, if it does, though we would still need to test all the 2n sections in cases where it does 
not. This number 2n arises from the fact that to completely cover all combinations of grouping cells 
into sections we need to consider for each cell two sections for each existing cell, one touching its 
top while the other touches its bottom. 

Sphere packing is a rich field of its own, within which the packing density is generally refered 
to as 7, an efficiency, instead of the usual density symbol p. The rigid packings of spheres vary in 
density from the lowest in loose packing where 7 ~ 0.06 to the highest, which is shared by the cubic 
and the hexagonal closest packings, 7 = 0.74. A rigid packing is a packing in which all spheres 
touch at least four others, and the points by which each sphere touches its neighbours can neither 
be all in the same hemisphere nor all on an equator, i.e. a greatest circular section. So we can now 
limit the value of p that we shall use to be in accord with 0.06 < 7 < 0.74. In this early stage I 
shall not use a Monte Carlo study to find the probable p, i.e. 7, but will aproximate it to be some 
value within the range mentioned. Since the most familiar sphere packing in human history must be 
that by which oranges are stacked at markets, expecially open markets like the one at Bolton, which 
gives the efficiency of packing 7 =~ 0.74, we shall assume that this is the way the clusters arrange 
themselves. 

Notice also that piling oranges in a neat tetrahedral shape on a table and a packing them 
into a rectanbular box both produce the same crystal structure, that is the face-centred lattice, the 
difference being only in their habits. 

For all intents and purposes the percolation probability of spheres under the influence of the 
van der Waals force must be the same as p- of a face-centred lattice. This is because the biggest 
cluster of both cases will have the same structure and their orientation will determine the orientation 
of the structure. We can do away with the orientation of other minor clusters precisely because they 
are much smaller, which justifies our grossing over their individual shapes and only concern ourselves 
about their statistics, that is to say, their number. I think that stacking oranges into a box is cubic 
close packing while a pile of oranges is hexagonal close packing, but this needs to be checked. 

To find p,. of the close-packed cluster of spheres, one needs a program similar to the one 
mentioned in § 6.10, but which would do the job for three dimensions instead of two. For this 
purpose, the program for 2-d tilings mentioned in § 6.10 has been developed further to deal with 
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regular lattices in three dimensions. At first I thought that there should be some other way to do 
this instead of having to develop another program for a general lattice in three dimensions, since 
this is already the last week of the project and time is running out. But in the end I found it far 
better to spend some time to systematically develop a program for general cases than to opt for 
some adhoc approaches. As a result, a program that creates regular lattices in three dimensions for 


the purpose of percol 


ation study has been written and is listed in § A.28. 


As the 2-d program in § A.6 does for all 2-d regular lattices, this new program can deal with 
n three dimensions. The difficulty is, however, in the meticulous nature of 
identifying all the vertices and links in each unit cell. In this respect, the cubic close packing is 
much simpler to do than the hexagonal close packing. Therefore I will only do the first one while 


all possible lattices i 


leaving out the secon 


d, which ideally could be used for the purpose of comparison. 


Figure 6.10 shows the lattice generated by the program and one which is used for finding the 


percolation threshold 
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Figure 6.10 Percolation of the cubic close-packed lattice; (a) a unit cell, (b) eight unit cells, 
one from each of the eight groups, (c) network of size5 x 5x5 unit cells, which is used in a 
simulation, and (d) the same network with only boundary edges drawn to make it easier to look 


at. 


(c) (d) 


At present the program only finds py, pe, Ly and ®e, not Pc, Py, L_ and x. There may be 
altogether three types of cell and bond pairs, in comparison with two in the 2-d case, depending 
on whether the number of shared vertices required be 3, 2, or 1. For our purpose in the study of 
filtration, we only need to know p,, which, when generated from a 5 x 5 x 5 network as shown in 
Figure 6.10 (c), turns out to be 0.25. All the results from simulations are p, = 0.2501 +0.0400, 2, 


8.0645, pe = 0.1320 4 


t 0.0209, x, = 17.1709, while n, = 341 and n, = 1,375. 


This means that when the space will be blocked, i.e. percolates, when it is filled up to one 
quarter of its volume by suspended particles in the form of clusters of the highest packing density. 
Because the cubic close-packed spheres fill 0.74 of the space, this ratio translates into the real volume 
ratio of 0.74 x 0.25 = 0.185, that is 18.5 per cent by volume. If the fluid in our system is water, 
then p = 1,000 kg-m~° and the percentage by volume above is equivalent to a density of of the 
suspended particles of 555 kg -m~*. Notice also in our simulation that the cluster shapes need not 


be convex. 
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In the light of the symmetry between particles and space, in other words between particles and 
anti-particles, which give rise to a symmetry and the three types operational regions that I originally 
proposed in a study of traffic congestion (cf § 7), the operational space of our filter may fall into 
three distinct regions when it is subjected to very small particles suspended in a fluid. 


If we specify by p, the ratio of the volulme occupied by all the clusters to the total volume, and 
p the density in weight per volume, and if the three regions of operation are labelled I, IT and III, 
then in the case of I, 0 < p, < 0.25, while for II, 0.25 < p, < 0.75 and for III, 0.75 < py <1. In other 
words, for I, II and III, we have respectively 0 < p < 555, 555 < p < 1,665 and 1, 665 < p < 2, 220, 
where the unit of p is kilogram per cubic metre. Generalising this, the regions I, II and III correspond 
respectively to 0 < p < po, = pi, pr <P < Peo = po and po <p < pc, where p, is determined by a 
physical constraint, namely the packing efficiency mentioned. 


Qualitatively speaking, these three regions may correspond to the operational-, blocked and 
non-operational regions. If our system also contains other particles which are larger than the pores, 
then in Region I filters will operate normally until the effects of blocking or blinding by the large 
particles become prominent, as has been studied in literature (cf Jackson, 1994; Jafferali, 1995). In 
this case fouling of the filter is caused exclusively by the blocking or blinding of these larger particles, 
which result in the formation of cake, and unless p = 0 there will be some blockages of internal pores 
due to the blockage caused by small suspended particles forming cluster. This latter type of blockage, 
which is of our concern, is to be expected due to various reasons. Cluster formation may be caused 
by nonhomogeneity in the concentration of the suspension which raises the concentration in some 
region such that it exceeds p1. 


Additional reduction in the flux is to be expected from two reasons. Firstly blocking clusters 
may block some of the pores. And secondly, the suspended particles together with free clusters, i.e. 
those which are smaller than they could block pores, displace the volume of the liquid surrounding 
them and thereby reduce the flux. The first one of these will produce an effect similar to blinding 
described in literature (cf Jackson, 1994; Jafferali, 1995, ibid.), where no backflushing may recover 
the filters to their virginal state. On the other hand, the majority of those particles and clusters in 
the second scenario is expected to be easily removed when backflushed. Among these latter there 
could yet be some which adhere themselves to the walls, whose fixation defies backflushing. But 
these last ones are expected to be small in number, and thus can be neglected, because we shall 
assume that the combination of p and channelling results in the possiblity that pores are blocked 
being very close to either zero or one. 


The channelling effect, or the occurence of rivulets by some other authors, is the formation of 
preferred paths through a porous media through which liquid and the solids it contains pass. It is 
not yet clear what these rivulets would do to our system. If all the channels channel equally both the 
liquid and the solids, then the blockage along these path may be expected to rise above the average 
value of the whole structure if only because this becomes more probable statistically. But if there 
exist some channels which prefer channelling liquid to particles or vice versa, then the effect they 
produce will vary and become complicated. For example, channels which like to channel particles 
are more likely to find themselves blocked in the end by those particles which pass through them. On 
the other hand those channels which channel liquid better than solids will be less prone to blocking 
on average, but will leave other pores around them with the excess particles, and these latter will 
necessarily become blocked more often than usual. But, for our purpose here, we shall assume that 
it is solid particles that are being channeled. This should raise the possibility of blocking in some of 
the pores by certain amount. Channelling in general needs further investigation which will not be 
covered here. 


Before going on to the next step of our study I should briefly mention the core idea that makes 
the program in § A.28. There are eight types of unit blocks here, compared with the four types in 
the case of the program in § 6.10. These correspond to the area drawn and labelled in Figure 6.11. 
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Figure 6.11 shows the eight areas defined by 


vir VIII the eight types of unit blocks they contain. 
/ Area’s from I to IV correspond to those previ- 
7 ously defined for the 2-d program. Although 


unit blocks in the various areas works differ- 
ently, that is to say, they adopts different set 
of vertices from differnt sources, and create 
different edges, all of them follow the same 
four rules. These four rules in the mnemonic 
not cryptic forms which I use are, take vertices 
l< ; from behind, make front vertices, draw edges 
behind and draw no front edges. With these 
rules in mind, both programs should become 
| self-illuminating to such extent that no fur- 
\ ther explanation is needed. This set of rules 
Il does two things, namely organise vertices and 
then link them with bonds. The unit vec- 
tors in the three directions being orthogonal 
means that we will have a nice and square end 

0 product suitable for a percolation study. 


Figure 6.11 The eight areas defined by the 
eight types of unit blocks. 


> VI 


Pad 


In fact it is wrong to say that all four rules work differently for each unit group. Only the two 
on vertices, viz. the first two, are different. The rest, viz. the last two which concern edges, are the 
same for all basic units. These are the only two crucial tasks with the discovery of which the writing 
of both program becomes worthwhile. 

The input data needs only contain details regarding units in Area II, III and V. Area I, being 
at the origin, is trivial, or should one rather say unique. Area IV can be derived from Area’s II and 
III. Like wise VI is derived from II and V, and VII from III and V. Finally Area VIII turns out to 
be nothing but I, III and V combined. 

So far we have only mentioned the situation where 0 < p < 1. In the second case, where p; < 
p < pz, many more pores are blocked from small particles than in the first case. The concentration is 
already beyond the first critical point. But while the second critical point is still not reached, there 
would still be an infinite cluster of space — in this case the liquid — surrounding the particles. In other 
words the space still percolates. The presence of this infinite cluster, or continuum of the medium, 
means that the filter can still be in operation until it should be blocked or blinded by larger particles 
which individually can physically block the pores as found in existing literature earlier mentioned. 

The third and last case, where po < p < p-, represents the extreme which can be easily 
comprehended. Here the solid particles occupy more space than the liquid does, as a result of which 
the combination is no longer a suspension but a slurry. Clay material produced by this slurry would 
block most of the pores within the structure and make filtration impossible. Backflushing will not 
be effective on filters which have undergone such fate. 
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§ 6.11 The second part, flow through the cells 


Next we will investigate briefly the effect that channelling may have on the value of p.. There 
are three cases considered here. The program for this purpose is listed in § A.29. The program 
creates a centroidal Voronoi tessellation in three dimensions. The first set of simulations works on a 
normal case of cell percolation, similar to that in § 6.11 but here the system is a centroidal Voronoi, 
which implies a constraint on cell sizes and distribution. The function perd in it is obtained by 
inputting the Blocked variable instead of generating it internally. 


In this section, I write as I go along with my developping the programs, so the contents should 
be easier to follow than in other sections. This is not to say that in those other sections I had not 
kept records of what I discovered. Every Ph.D. student starts off doing his project knowing that he 
should write along as he goes, and plans to nothing but that. But the truth is that eventhough we 
always write, but the way we write develops with our experience. Also, with the the increase in the 
understanding of our problem, we no doubt would be able to write a better description of what we 
do and how we do it. I think that this is an unavoidable fact, and feel that it probably is the reason 
why we should keep on working. 


So much for an aside. From one hundred generators originally, Voronoi operator is applied 
twice. After the rims has been trimmed there are 280 centroidal Voronoi cells remaining, and this 
is the value of n,. For x, the value is 10.7929, while p, from 2 x 5 simulations is 0.2314 + 0.0602. 


Next investigate the effect of channelling by assuming that the steepest gradient of all the 
bonds arriving at a cell decides how quick it percolates. Here cells are sorted according to their 
steepest gradient of incoming bonds. Working on the same network as previously, if the percolating 
order is such that the steeper the quicker, then p, = 0.2107. But if on the other hand steeper 
incoming bond means slower percolation, then p, = 0.1429. The critical probability is constant in 
this case since the order of percolation is predetermined by the orientation of bonds with respect to 
cells. 


If instead of looking at only a single bond we take the signed summation of bonds entering 
and leaving a cell, then p. = 0.1321 when the criterion is min(>> b; — 5+ by), and p. = 0.1393 when 
it is max(}> b; — >> be), where 6; and by are respectively the incoming and outgoing bonds. 


Our studies up to now tell us that if the suspension is homogeneous and there is a rivuletting 
effect, then the location of the blockages made by clusters of suspended particles among all pores of 
the structure is predetermined. This is in contrast with the blinding and blocking of large particles, 
where such location is random. In fact, even for these latter large particles, the location can only be 
random when the particles have a variety of sizes. It can never be wholly random, however, if this 
is not the case, since in the former case the randomness is introduced by the distribution of sizes 
which is random, but in the latter the blinding or blocking will be determined by the size of pore 
openings which is fixed by the geometry of each network. The randomness then can only be in the 
order not location of blockings. 


The next study is a combination between continuum and network percolations. Here suspended 
particles are grouped into quanta, each channelling through a path or rivulet of interstitial distance 
with some interstitial velocity. 


At the top, the layer of the structure where the incoming particles arrive, is a cross section 
all the cells of which are gridded to provide means to determine the path at the beginning of each 
quantum. The partitions in this layer is conveniently found by cutting some faces of the convex hull 
of each cell in the top layer by the plane z = 0.9zmax, where Zmax is the maximum z-coordinate of 
all the cells under consideration. 


Given coordinates of two points, (x1, y1, 21) and (x2, y2, 22), and a plane equation z — a = 0, 
we may think of the plane equation as being one coordinate given, z = a, and find the coordinates 
of intersection between a line passing through the two points and the plane from the parametric 
equations for the line. Parametric equations are in fact interpolation done on each of the coordinates. 
In this case, which is useful when finding the intersection between an edge of a triangle and a plane 
perpendicular to some coordinate axis, the parametric equations are © = %1 + Xiet, y = yi + Yiat 
and z = 21 + 212t. From the plane equation z = a, therefore t = (a — 21)/z12 = (a — 21) /(z2 — 21). 
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The program being written finds the intersec- 
tion of cells with the horizontal plane by find- 
ing the intersection of the faces of its convex 
hull with the same. Since every face of the 
convex hull is a triangle, the program essen- 
tially finds intersection between edges of these 
triangles and the horizontal plane. The result 
obtained from an intermediate state during 
the course of development of the program is 
shown in Figure 6.12. The partitions look in- 
complete because the picture is taken as a test 
while developping the program as mentioned. 
A picture with the same degree of incomplete- 
ness as this one is not to be obtainable from 
the comleted program. 


Figure 6.12 Intersection of convex hull faces 
and the horizontal plane. 


For each face of the convex hull that intersects the plane, there will be two points of intersection 
arising from the two edges of the triangle intersecting it. Let (x1, y1) and (x2, y2) represent these 
two points. Then we may scan up in the y direction finding = 21 + (y — y1)@12/yi2 for each y 
along the way, and then scan in the x direction, this time finding instead y = y1 + («@ — 21) y12/212. 
Aferwards we could fill in the space by scanning along the x direction for all y positions. 


Figure 6.13 shows the progress of my programming the codes, step by step, trying to close 
all the partitions such that no gaps remain. Two problems have been discovered, namely those of 
rounding and precision. Before the correction the resul looks like Figure 6.13 (a) and (b), and after 
rounding problem corrected Figure 6.13 (c). 
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Figure 6.13 Correcting the effect of rounding, in other word discretisation. 
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(a) The gaps 


resulted from rounding or discretisation, (b) a closed-up view of (a) and (c) partial remedy 
where roundings have been solved but with the degree of precision not yet raised. 


After having corrected the problem regarding precision, by increasing the number of steps 
when calculating x or y, the result still misses several walls, the cause of which is still unknown at 
present. This is shown in Figure 6.14. 
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(b) 
Figure 6.14 After having increased the precision to ten times the previous value, (a) and a 
closed-up view, (b). 


At first I thought that there might be some triangular faces missing from the surface of the 
convex hull, which would have accounted for the missing boundary in the section. But after having 
tested the minimum number that an edge of each hull appears as the edges of all its triangular faces, 
and see that it’s value is correctly two, this becomes out of question. 

The figures, viz. Figure 6.12, 6.14 and 6.14, are produced from the spy command in Matlab, as 
a result of which the z-axis runs downwards while the y-axis runs to the right. This command looks 
at a matrix from above as we look at a map. In the present case our matrix is a full-, not sparse 
matrix. The number written at the bottom is the number of all its nonzero components, which is 
less than the number of times that we calculate them since we need to calculate some of the points 
more than once in order to increase the precision to eliminate gaps in other places. 

The command spy is used more often with sparse matrices since these are often too large to 
list, and listing their members in pairs makes it difficult to visualise. As an example, Figure 6.15 (a) 
is what we get when we spy our neighbour matrix necc, while in Figure & (b) are all the neighbours 
that the 100% cell has. Cells which have few neighbours generally live along the border. For example 
the 110¢ cell has only three neighbours, and it is located not far from the lower x limit. 


50h. 
1005. 
150¢* 


200}: 


0 50 100 150 200 250 6 “50. *100.~~~~*150 200 “250 


nz = 3022 nz=11 
(a) (b) 


Figure 6.15 The result when we spy our neighbour matrix. Here (a) shows the neighbours of 
every cells while (b) only shows those of the 100 cell. 
At this stage I recheck the neighbour matrix of the program, and find that it includes poorly 
defined neighbours, that is those which only have one vertex in common. Therefore I changed the 
program first to only look for neighbours who share at least two vertices. But this has shown no 
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noticeable changes in the results that we have so far. 

The next step is to colour the cells. Like a child painting a picture, there are so many ways 
one can paint or label the tiles of a tessellation. For example one could draw a vertical line first 
and then branch out either horizontally or diagonally. On the other hand, one could also draw the 
diagonals first Yet another way is to expand radially, spiralling outwards. With parallel computing 
we could also divide the area into domains, paint each domain, and then merge the resulted areas 
together. 

But here I opt for painting the cells by scanning horizontally, moving upwards in layers. Once 
past a wall, the program moves on until the next wall is reached while gathering all the grids that 
are between the two walls into one group. It then colour the whole group by a colour picked up 
from one layer below it. If no colours exist, then it creates a new colour which in turn gradually 
propagates upwards this way until the upper wall is reached. 


The intersection of bonds will not always coincide 
with the intersection of the cell, neither is the pro- 
jection of a cell perpendicular to the plane the sec- 
tional plane of the cell. This is because of the three 
possible situations shown in Figure 6.16. In Fig- 
ure 6.16 (a) the cell section contains several points, 
while both (b) and (c) contain none. 


(c) 


Figure 6.16 Sections of bonds and cells. 


And here sadly the time runs out, so I will suffice myself to describing what I see should be 
done next. Up to now we have a three-dimensional network and its top section. We also have the 
list of all its bonds, which contains the connections and the draining angles sorted in a descending 
order. 

Next we should find a mapping from each cell section to the corresponding nuclei. Then the 
times it takes to traverse each bond must be calculated. This time for each bond is then divided by 
half, one belonging to each of the two cells connected by the bond. 

When it comes to bombarding the filter with our small particles, we can not keep track of 
millions of particles and therefore we should quantise them into units. These units or quanta can 
then be treated as individual particles. When a quantum enters a cell, it is assigned t, the time to 
reach the nucleus. Later time sees this ¢ decreases in steps until it finally reaches its destination, the 
nucleus. Once there, it is assigned the next bond to go along, taking into account what bonds are 
available at the time and their comparative probabilities, which in turn depend on their gradient as 
mentioned. When this is decided, it is given t1, the time it would take to reach the border that lies 
at mid point of the bond. 

This goes on forever, apart from that at each time step we look to see whether the blockages 
in our filter has percolated. After updating the list of blocked cells, if we find that percolation has 
occured then the simulation would end. Percolation occurs in each cell whenever its concentration 
has reached a certain value. This value we have found in § 6.11 to be 18.5 per cent by volume. 

To calculate the flux decrease we find instead the decrease in the superficial area. This is 
calculated from the total volume of the void subtracted by the volume of all cells that had percolated, 
and then subtracted by the total volume of solid particles which are suspended inside the network. 
The area of the cross section is then the volume which remains divided by the thickness of the filter. 


It is not a little to have to leave things unfinished after having started it off. But as one New 
Zealander poet says, ‘Alone we are born and die alone, yet see the red-gold cirrus over the snow 
mountains shines. Upon the up-land road ride easy, stranger. Surrender to the sky your heart of 
anger.’ And with this I go on to the next chapter. 

t 


§ 7. Percolation in traffic modelling 

It does not take much imagination for an average person to see that traffic congestion is a 
percolative process. As I have lived and studied in Bangkok where, at that time, the traffic jams 
were renowned as being second to nowhere in the world it would have been peculiar indeed if 
after having acquainted myself with the percolation theory I do not apply it to the study of traffic 
systems. I remember once in 1990 it took me more than five hours on a bus to travel the distance 
of ten kilometers or so along the Sukhumvit Road in Bangkok. Being then in my last year at the 
university and having missed an important meeting with my supervisor that day as a result, the 
reason I gave to my supervisor must have sounded like a lie. Only the newspaper of the following 
day could save my integrity. In it there was a report that the road on which I had spent a whole 
day travelling had been given a footage on the BBC World news. 

Soon after having decided to investigate the application of percolation to traffic, I gave a poster 
presentation at the Fourth Annual Conference of Thai Researchers in Japan in 1997, the proceedings 
of the event of which also contain a number of abstracts from some of the researches that I was 
currently working on (Tiyapan, 1997, KNT2(ii)). The poster presentation was under the title Fractals 
in the modelling of traffic networks and was reasonably a success in that it interested several people 
there and I was asked a number of interesting questions. One of the two honourary chairs of the 
event suggested that I wrote a detailed article for the monthly journal Sakkayaphab (Sakdyabhab) 
which is published by the Association of Thai Professional in Japan (ATPIJ), but such a paper 
never materialised as I found it difficult to write about the topic in Thai and I was reluctant to have 
my article translated from English again because there have been mistakes in earlier such attempts 
and the editing team does not always bother to tell the reader that the articles are translation 
(cf Tiyapan, 1996, KNT2(i)). One mistake which stands out is the translation of a passage in my 
manuscript,‘The irony in this is that while the money involved increases exponentially in relation 
to the cases of its counterpart which are known as the blue-collar crimes, the risk of being caught is 
comparatively small’, into a translated version which means the opposite, ‘Naikhanadi ajakamr [sic]t 
ik prabhed gue Blue-collar crimes, zteng boaban kab ngoen camnoan mak. Mia priabdiab kan laew 
ajakaur [sic] lhaont thuk cabkum mak kvé baeb raek.’ [While another type of crimes are Blue-collar 
crimes which involves a lot of money. Comparatively these crimes are caught in greater number than 
the first type. Whether I could write good Thai or not, from this lesson I think that from now on I 
should translate my own articles. 

In fact, it was not so much a poor translation of my article that I mind but the failure of the 
editor to acknowledge that the article was a translation. As it is the case, whether this be coincidence 
or not, translation quality tends to be better when the name of the translator is prominently written 
(cf Tiyapan, 1996, KNT2(i)). In the reference above, only minor mistakes appear in the translations, 
namely ‘however’ translated into a word which means ‘moreover’ (yang) and similarly ‘metaphor’ 
into that which means ‘simile’ (upama). 

The paper in § E.20 is, except from a few minor spelling corrections and the changed format of 
the bibliography, an exact reproduction of the paper I submitted electronically to an international 
journal based in America, either the Journal of Statistical Physics or the American Journal of Physics 
I am no longer certain since I have no access to the backup copies of my own files on the computer 
in Japan. 

I feel that these minor changes are justified if only for the reason that the paper has not been 
accepted for publication. I include it here in order to show the development of ideas leading up to 
the present work. Towards that end all the contents, and as far as possible even all the syntactic 
and grammatical mistakes, have been left untouched. Some of the figures have been left out due 
to the loss of my home directory on a computer in Japan which I have learnt about soon after my 
arrival to resume my Ph.D. research in Manchester. The address of correspondence listed is my 


} should be ajayakamr 
q{ should be ajayakaur 
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home address eventhough I was then with the Tokyo Institute of Technology. This was only to avoid 
further misunderstanding in cases where letters to me had been opened before they reach my hand 
without due apology. I suppose that the idea about the unity of a laboratory there amounts to a 
different standard of privacy and respect from what I have been brought up to believe in. There, 
for example, the circulation of preprints received for refereeing among the nearly twenty members 
of the lab is a matter of course. 


The supposedly inferior quality or contrivedness of the paper can probably be ascribed to 
various factors, for example the constant dread of always being observed (though I have no doubt 
whatsoever about the relevancy of such topic to modelling in control systems), constant and to me 
somewhat purposeless drive towards publications by all possible means, and last but not least my 
own shortcomings. Nevertheless, I still believe that the approach I proposed there is sound and the 
idea new. 


My interest in traffic began at the age of thirteen when I as a boy scout volunteered to become 
a traffic scout to help managing the traffic, mainly around my school but also occasionally at some 
other places around the city of Chiangmai, Thailand. The work, which I had done for two years, 
has given me a first hand experience but is not directly related to the following modelling of traffical 
network. 


In the simulation the networks are drawn which have their vertices as points where two or more 
roads meet one another. The proposed study is to compare the robustness of two traffical networks 
by comparing their percolation thresholds. When a new motorway is planned, for example a ring 
road around a city, the two networks, one with the ring road and the other one without, can be 
simulated to find their percolation thresholds and then these values compared. 


Space cars 


Traffic status or condition when the percola- 
tion probability p, of cars is more than 0.5. 
The traffic condition is generally described 
as free-flowing, congested, or stand-still. For 
cases where p- > 0.5 as the one shown in Fig- 
ure 7.1 the stand-still traffic corresponds to 
the situation where only cars have percolated 
free-flowing congested stand-still but not the space, that is the places on the 
x >|« >\« >| road available and accessible to the cars. A 
free-flowing traffic is where only the space but 
not the cars has percolated, and a congested 
traffic is that when neither of the two has. 


Figure 7.1 Traffic status, p. > 0.5. 


0 (1-Pc) 0.5 Pc 1 
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Traffic status or condition when p, is less 
than 0.5. On the other hand, in the case 
where p, < 0.5 shown in Figure 7.2 the critical 
probability of cars is now on the left hand 
side of the middle line instead of on the right 
hand side thereof in the previous case where 0 Pe 05 (1-Pc) 1 
Pc > 0.5. Definitions of the free-flowing and 
the stand-still statuses remain the same, but 
the congested traffic is now the traffic where free-flowing congested stand-still 
both cars and space have percolated. An in- |~« ~~ mln >| 
teresting question is whether or not there is a 
difference between the congested area in Fig- 
ure 7.1 and the one in Figure 7.2. 


Figure 7.2 Traffic status, p. < 0.5. 


A modelling algorithm which studies the percolation of a traffical networks starts by finding all 
the vertices and edges forming a network from the road data. Then a blocking algorithm operates 
by randomly shutting off one edge after another until the network percolates when the critical 
probability of the network may be calculated. A control algorithm for the real time traffic control, 
however, is as shown in Figure 7.4. 


space has percolated, then in Figure 7.4 the 
cases I, II, and III are respectively aC’ AS, 
(AC A -7S)V (CAS), and (CA 7S). Case 
Lis the normal congestion, nothing to worry 
about. Examples of the control schemes used 
in Case II are overriding of the traffic lights 
by the manual control of traffic polices at cer- 
tain strategic points, temporary one-way sys- 
tems, bird-eye view observation and feedback 
from helicopters, traffic control centre, dis- 
tributed control centres together with traffic 
radio channel broadcast. And lastly the most 
important and critical Case ITI the emergency 

plan of which may include directing all cars rx] 20 control yates hea 
away from congested clusters or if necessary 
out from the city, and directing all incoming 
traffic such that no more cars may enter the 
city until the emergency status ends. 


Let C means cars have percolated and S means ae 
t k 


find percolations 
of cars and space 


Figure 7.4 Proposed traffic control in real 
time.. 
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A congested cluster can be broken up by forming a one way flow channel cutting through it 
which leads cars away from the cluster. How far the channel needs to go before letting the cars on 
it circle and seep back into town depends on how badly congested the traffic is. Although it is a 
normal practice to lead cars along a long detour because this brings in more road surface and thus 
enlarges the network, identifying the percolationg cluster and cutting it into two or more parts by 
guarded flow channels is much less common or even unheard of. I think the latter is more important 
and will lead to a better and more effective control, namely the control fo the percolating, in other 
words the biggest, cluster. 

The percolation probability is important for the networks of traffic both inside cities and among 
them. It shows the degree of connectivity of the area being considered. Urban road networks have a 
general character which differ from one country to another, the simplest construction of which seems 
to be that of the square lattice. One can find this theme of the square lattice and its variations, 
similar to the dislocations and defects found in minerals, in America. Examples are Denver, Aspen, 
Durango, Pueblo, Salida and La Junta in Colorado; Boise, Pocatello and Twin Falls in Idaho; Butte, 
Bozeman, Coeur d’Alene, Kalispell in Montana; and Cheyenne, Laramie and Sheridan in Wyoming 
(cf Florence et al). The Great Junction in Colorado and the Great Falls in Montana are very close 
to being perfect square lattices. As more examples of these (cf Collins USA, 1999), in Arizona there 
are Phoenix, Yuma, Tucson; in California Bakersfield, Central San Francisco, Central Sandiego, 
Fresno, (Central) Los Angeles and vicinity, Modesto, Sacramento; in Colorado Fort Collins, Denver 
and vicinity, Greeley; in Florida Central Miami; in Georgia Central Atlanta; in Illinois Champaign 
and Urbana, (Central) Chicago and vicinity,, Quad Cities, Rockford; in Indiana Fort Wayne and 
Indianapolis; in Kansas Topeka and Wichita; in Louisiana Central New Orleans; in Maryland Central 
Baltimore; in Minnesota Central Minneapolis and Central St. Paul; in Missouri Central Kansas City; 
in Nebraska Lincoln; in Nevada Las Vegas; in New York Manhattan; in Oklahoma Lawton, Norman, 
Oklahoma City and Tulsa; in Pennsylvania Central Philadelphia; in South Dakota Sioux Falls; in 
Amarillo, Central Houston and Lubbock; in Utah Central Salt Lake City; in Washington Central 
Washington D. C. and Central Seattle; and in Wisconsin there is Central Milwaukee. One example 
in Canada is Toronto. The square lattices of these cities are sometimes cut through by motorways 
or interstate highways as is the case in Amarillo, Texas. Or they can be surrounded by a ring road 
or a county highway as is what happens with Lubock, also in Texas. 

When the percolation probability is greater than 0.5, we have the interval p, + (p. — 0.5) where 
neither the blocked nor the free roads percolate. If this interval is narrow, that is if p. — 0.5 is small, 
then within this interval the condition of the traffic is very sensitive, and even a seemingly small 
change may lead to a standstill or instead to a free-flowing traffic. This is easily visualised, since in 
such situation there would be small islands of free-flowing roads within a large congested cluster, and 
vice versa small clusters of congested roads within an otherwise noncongested area. Despite their 
sizes, such small islands of anomaly in either of the phases are particularly important. Moreover, 
their importance increases the closer p, is to 0.5. The same characteristic happens in politics where, 
in the case of coalition governments, a minority party which has relatively few representatives can 
become critically important and influential to the major party when the latter needs them in order 
to be able to govern (Ireland, 2002). 

Plan to build a ring road around a citie usually includes flyovers, overbridges, and tunnels 
in order to avoid having intersections. The design philosophy used in Europe is to have heavier 
traffic goes under a lighter one, which results in either the ring road going into a tunnel or having 
overbridges or viaducts over it. The philosophy used in Thailand which used to be for the heavier 
traffic go over the lighter traffic, which puts a more severe limit on the weight of trucks and is 
therefore not economic in the long run, but this has started to changed, if only to follow the practice 
of the west. Ring roads do not necessarily resemble a circle, as in the case of the circular speedway 
proposed around Saint Petersburg (Petersburg, 2001), which is in the shape of a cashew nut. It will 
link the arterial roads of the city to Helsinki, Kiev, Moscow, Murmansk, and Tallinn into a network. 
The route proposed is 155 kilometres in length, has 31 bridges, 16 overbridges, 55 viaducts, and 
will support the volume of traffic of 21 million tonnes. The implementation and contract work is 
looked after by a joint-stock company KAD Sankt-Peterburga, under the order of St. Petersburg 
and Leningradskaya Oblast. 

One classical example of a ring road is the M25 motorway which forms a circumscribed ring 
around London. Another more recent example is the M60 orbital motorway around Manchester. In 
the case of M60, various sections of existing motorways have been put together and renumbered. 
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The northwest quarter used to be M62, the southwest one M63, and parts of the remaining used 
to be M66. The motorway forms a complete ring around Manchester since 2000 with the opening 
of the final northeastern part which stretches from Denton to Prestwich. There is another smaller 
ring, an inner ring, which is formed by the A6010 and A576. Orbital motorways around cities have 
now become indispensable and are the hallmark of a city. 


§ 7.1 Traffic networks 


In his paper submitted to the Journal of Statistical Physics Tiyapan (1997) introduces a new idea of 
considering the development of clusters in both phases at the same time. Applied to the context of 
traffic network, these phases are namely cars and spaces. Furthermore, because both phases reside 
in one and the same network, there is a symmetry which divides the probability space into three 
regions, symmetric with respect to p = 0.5. This helps divide the traffic condition into three regions 
as existing literature in traffic study at the time described, namely free flowing, congested and stand 
still. In particular, this idea explains the difference between the congested and the stand still states. 
There has been no reply from the journal. 

However, the author of this unfortunate paper has later come across one paper by two math- 
ematicians in the U.S., coincidentally published in the Journal of Statistical Physics, which uses 
the very idea he laboriously introduced almost exactly four years ago without having received a 
word from either a reviewer or the editor of that very journal. Thus Gray and Griffeath (2001) 
reintroduced the idea of anticars, which are essentially vacant spaces, antigaps and antibonds, which 
purportedly, greatly helps the derivation of their theories thanks to the symmetry involved. More- 
over, one reference made therein (Sipress, 1999; who starts his article with, ‘Why is traffic so damn 
bad?’) compares the free flow, synchronised flow and heavy traffic respectively with gas, water and 
ice, and explains that as the latter’s can be explained by phase transitions, so can the former’s. But 
this is just what I have tried to explain back in 1997, that in the case of the gas the spaces had 
percolated but not the water molecule, in the case of the ice it was vice versa, whereas in the case 
of the water neither had yet percolated, or both of them had yet to percolate. When explained this 
way, it becomes clear that the water phase within the air as a network has p, < 0.5. And so the 
case also must be with antiwater, for that matter. 

According to Sipress (ibid.), the modelling of traffic is a hot subject in which Nobel prize 
winners, and cold war physicists alike, are flocking to produce world class scientific papers, which 
seems to include no Tiyapan. But can plagiarism be excluded? 


t Lawrence Gray and David Griffeath. The ergodic theory of traffic jams. Journal of Statistical Physics. vol. 
105, nos. 3/4, 413-452. November 2001. 
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§ 7.2 Percolation of road networks 


I began my study of the traffic networks in 1997 while in Japan. In the same year I submitted 
two papers, § E.19 and § E.20, to the Journal of Statistical Physics, electronically as it was required 
thus. There was an automatic email which said that my papers had been successfully received. 
Apart from this, I heard nothing from them, and several months later, when I wrote to inquire, 
there was no reply. One of these two papers was on traffic congestion. In it I introduced the new 
idea of considering the percolation of space in accompany with the usual percolation of congested 
cars. If we do this, our operational space will be readily divided into three parts instead of two, which 
correspond with the three known traffic situations, namely free-flowing, congested and stand-still. 

Recently I found out that there have been some papers published in 2001 in the Journal of 
Statistical Physics which used this idea which I tried to introduce back in 1997. I was totally 
flabbergasted, and could not decide what to do. I do not know whether I should write and complain 
to the editor of the journal, nor do I know whether this would be a worthwhile thing to do. I do not 
know whether to exclude plagiarisation. 

I have developed a program and a procedure for finding the percolation thresholds of road 
networks. The programs are listed in § A.25. These are different from the usual percolation programs 
used for other kinds of networks including Voronoi. Because of the existence of flyovers and elevated 
express ways, we can not use the duality operator to transform a network of vertices and edges into 
one of cells and bonds. Having said that, the said transformation could become useful in the future 
in some other applications, in some other areas or even within the study of traffic network itself. But 
at present I only have one application in mind for the dual networks of roads, and that is related to 
fire prevention where such an application is by no mean obvious. Therefore, here the boundary is 
defined again to obtain the cells which represents the zones. 

The codes also contain data of several towns and cities, namely Amsterdam, Brussel, Freiburg 
and Manchester. There are three main datasets. The first one contains a list of the coordinates of 
all the vertices. The second one is a list of edges, together with the numbers of the cells that each 
of them connects. The third one contains the coordinates of turns in each of the roads listed in the 
second dataset. This is in order for the graph to look like the actual roads it represents, instead of 
containing only straight lines, as would have been the case were the windings of the roads not to be 
taken into account. Also, these coordinates will make it possible to calculate the true length of each 
road. Eventhough we have no use for these lengths at the present stage, future developments may 
need them. 

The procedures which I have developed for gathering the data and processing them can be 
carried out by a single researcher, and require no sophisticated tools. Were these tools become 
available in the future, the former could be adjusted to accommodate them. 

To my surprise, so much so that I first thought that there was something wrong with the 
program, the mean coordination number of the road networks of Manchester turns out to be exactly 
3. The second simulation gives x, = 3.0513, which is still very close to three. 

Mancheter Mancheter (fire control area) 


1000 metres ——————__ 1000 metres 
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(a) 


(b) 


Figure 7.5 For Manchester in this picture, ny = 220, ne = 3380, ne = 25, ny = 50, Ly = 
3.0000, %¢ = 4.7278, Z- = 4.0000 and x, = 6.5200. 


Figure 7.6 shows the largest clusters plotted against p, the probability that each vertex, edge, 
cell or bond respectively for (a), (b), (c) or (d). Here p® is the percolation probability of the 
space in the network of vertices, and similarly for p?, p? and pj. Each plot represents one of 


the runs of simulation which, for networks 
critical probabilities all over the place. But 


of these sizes and variances, literally distributes the 
the plots of the largest cluster sizes always look very 


symmetrical. This seems to suggest that these sizes may represent the point of percolation better 


than the percolation probability. 
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Figure 7.6 Manchester. Plots of the largest clusters of, (a) vertices, (b) edges, (c) cells and 


(d). Here (py, p>) = (0.5455, 0.7182), (pe 


,p) = (0.6152, 0.4939), (pe,p%) = (0.6400, 0.6000) 


and (pp, p?) = (0.1200,0.5000) respectively for the cases of (a), (b), (c) and (d). 


The mean percolation probabilities from (2x 10) similar simulations as the two shown in each of 


the four cases of Figure 7.6 are py = 0.6723 4 
and p, = Er[0.3720,0.1149]. 


| 0.0762, pe = Er[0.6083,0.0838], p. = Er[0.6240,0.0921] 


Next consider Amsterdam in The Netherlands. The map for our purpose is shown in Figure 
7.7. Areas shown in Figure 7.7 (b) are usually bound by main roads or the rims of the picture. 


There is no definite relations between vertic 
other. 


es and edges on one hand, and cells and bonds on the 
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Amsterdam Amsterdam (fire control area) 
ae, 
LE 
1000 metres 1000 metres 
(a) (b) 


Figure 7.7 Amsterdam in this picture has ny = 487, ne = 745, Ne = 18, ny = 35, Ly = 8.0513, 
Le = 4.7007, &- = 3.8889 and x, = 6.8000. 
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Figure 7.8 Amsterdam. Plots of the largest clusters of, (a) vertices, (b) edges, (c) cells and 
(d). Here (py,p3) = (0.7187,0.7146), (pe,p2) = (0.6309,0.5597), (pe, p3) = (0.1778, 0.4444) 
and (pp, pi?) = (0.4286, 0.2571) respectively for the cases of (a), (b), (c) and (d). 


From (2 x 10) simulations we obtain p, = 0.7374 + 0.0500 and p, = 0.6328 + 0.0595, whereas 
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from (2 x 11) simulations p,. = 0.5960 + 0.1395 and jf» 0.3922 + 0.1395. 


Then consider the road networks of Brussel in Belgium, as shown in Figure 7.9, to gether with 
the fire control area, and the largest cluster sizes in Figure 7.10. Fire control strategy is only one 
possible application to which the percolation of areas. Many other applications which are similar 
in nature, for instance emergency evacuation zones, earthquake evacuation zones, zones prepared as 
measure against a terrorist gas attack, etc. There are also other applications, for example strategic 
areas in market planning and the study of mineral deposits. 

Brussels Brussels (fire control area) 
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Figure 7.9 Brussel has ny = 287, ne = 454, Ne = 21, no = 42, Ly = 8.1568, te = 8.1568, 
te = 4.0000 and xy = 7.0476. 
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(c) (d) 


Figure 7.10 Brussel. The largest clusters when percolate by means of (a) vertices, (b) edges, (c) 
cells and (d). Here (py,p%) = (0.6167, 0.6411), (pe, p2) = (0.6057, 0.6586), (De, p’) = (0.6667, 
0.5714) and (pp, pi) = (0.3095,0.4286) respectively for the cases of (a), (b), (c) and (d). 


From (2 x 10) simulations on Brussel we obtain p, = 0.6580 + 0.0771, pe = 0.6205 + 0.0540, 
po = 0.6286 + 0.1043 and py, = 0.3786 + 0.0924. 


And then consider a small town Freiburg in Germany, where the many roads that are reserved 
for pedestrians only seem at a first glance to have altered much of the structure. But simulations 
have shown that the percolation probabilities remain comparable with networks of other towns. The 
area- and bond coordination numbers obtained for Freiburg are rather low compared with other 
towns. This could mean that the emergency properties of the town is different from those of others. 
Its lower connectivity could mean that it is more robust than others against an attack or in the face 
of catastrophy. But it could also make it more difficult to evaculate from an area. More precise 
relationship between the valence and the interpretation in terms of physical networks can only be 
possible by more extensive investigations in the future. 


Freiburg Freiburg (fire control area) 
500 metres 500 metres 
(a) (b) 


Figure 7.11 Freiburg has ny = 75, Ne = 102, ne = 10, ny = 15, Ly = 2.7200, xe = 4.4510, 
te = 8.0000 and xp = 4.5333. 
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Figure 7.12 Freiburg. The largest clusters when percolate by means of (a) vertices, (b) edges, 
(c) cells and (d). Here (p,,p%) = (0.7338, 0.77383), (De, p2) = (0.6868, 0.6275), (pe, p=) = 
(0.4000, 0.5000) and (py, pf) = (0.4000, 0.38333) respectively for the cases of (a), (b), (c) and 
(d). 
Again, from (2 x 10) simulations we obtain for our Freiburg p, = 0.7400 + 0.1214, p, = 
0.6490 + 0.0787, p. = 0.5450 + 0.1276 and p, 0.3767 + 0.1190. 


§ 7.3 Theory of graphs and its applications 


Gay and Preece (1975) study graphs on square lattices, represent them as matrices and then apply 
this to the study of networks of fluid distribution through pipes where there are branch flows and 
nodal pressures. Such a graph has n nodes, m = b—n+1 meshes, where b is the number of branches, 
and any one of its trees contains (n — 1) branches. The direction of a mesh is the direction of the 
link connected to it. Define the branch-mesh incidence matrix C = [Cr;Cr] = [Cr;U] and the 
node-datum incidence matrix B = [Br; By] = [Br;0], where qj is 0, 1, or -1 when the branch i 
respectively is not in the mesh j, has the same-, or opposite direction; similarly, b;; is 0, 1, or -1 
when the branch 7 is not included in the node to datum path j, is going away from, or towards the 
datum node. Then V = E+e, J=1+i1,V = ZJ, J = YV, where E£ is the vector of branch 
pressure sources, %.e. pumps, e the vector of branch pressure rise, J the vector of branch flows due 
to the external inputs and outputs, 7 the vector of branch flows due to other causes. Then the mesh 
method has the solution i’ = (Ch ZrCr + Zr) 1 (EF), — Ch ZrBrl') and E}, = Ci}. Er + Ex, where 
y = [B,C], V’ =7'V, J =yJ', J’ = [I';7] and V' = [Vz;V{]. The node method, on the other 
hand, gives e' = (A7Y A)-1(I' — ATYE). 

Operation research uses graphs to help in its search for optimum solutions. For example the 
Evolutionary Operation (EVOP) and its variant Rotating Square Evolutionary Operation (REVOP) 
use covering graphs on a body-centred lattice in two- or three dimensions (Lowe, 1964) — correspond- 
ing to the cases of considering two- or three factors respectively — in finding its solution. Simplex 
EVOP is another variation, where 2- and 3-factor regular simplexes are used, which has the advan- 
tage that it uses the least amount of experimental points. An n-factor regular simplex has (n + 1) 
points, in particular a 2-factor simplex is the equilateral triangle and a 3-factor simplex is the regu- 
lar tetrahedron. All of these methods are possible at number of factors higher than three, but the 
procedure becomes more complicated and can not be shown graphically. 

A graph is connected if it cannot be divided into two subgraphs without common vertices and 
edges. A linear combination of oriented edges, >> ae; where e; = +1, is a simple cycle if a; is 1, —1 
or 0. It is a cycle if a; are integers satisfying some linear relations, and a chain if they are arbitrary 
integers. 

If vectors from the origin to vertices A; follow the relation A = >>m,;A;, then m,; are the 
barycentric coordinates of A. Here m; > 0, )>m; = 1 and A is the centre of gravity of the point 
masses A;. A convex linear hull of A; is then the space covered by changing m, to give all possible 
A’s. It is also known as a rectilinear-, Euclidean- or n-dimensional simplex. Simplices can simply be 
represented by the of their vertices. An n-dimensional simplex s? has n+ 1 (n—1)-dimensional faces 
the i:th one of which is where m; = 0. A k-dimensional face of s” is the set of those points of s” for 


which n — k barycentric coordinates are zero, while the rest change such that the corresponding m; 
are non-negative and their sum is equal to unity. The number of k-d faces in s” is *t!C,,41. 

The boundary of s” is the union of all its (n — 1)-d faces. The centre of a simplex is a point 
where m; = ™. 
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§ 8. Percolation theory as economic models 

Even if there existed only a single economic catastrophe in the whole history of man one would 
have needed to come to a conclusion that it is governed by a percolation theory. In fact the number 
makes no difference, only the existence is of consequence. If only there had been but one that would 
have been one too many, but there are too many of these catastrophes for us to ignore their presence. 

Economic and world histories tell us that the freedom possessed by each part in all scales of 
the social structure is a sufficient condition for the robustness in the economics and society. I feel 
that it is also a necessary condition. 

These phenomena are like percolation. All existing economic theories are valid up to and not 
including the point where they occur. Therefore, if we must understand the working of our economic 
system we have to know it in the light of the percolational theorems. 

Lack of freedom has already proved to be disastrous following the collapse of the Soviet Union 
and the eastern block countries. Deprived from their freedom, people and states alike will soon 
become poor in their facility to think because it had neither been practised nor honed. Inter- 
ventionism has shown to be equally disastrous, as though we could measure the depth when they 
occur and compare, by what happened to Germany following the end of the First World War. The 
Bismarckian Empire collapsed in 1918 as a consequence of military defeat. The first immediately 
striking economic consequence of this was the growth of the public sector. Another change was that 
more of the government expenditure came under control of the central state. Then in summer 1922 
hyperinflation set in as a consequence of the percolation which ultimately resulted in the Second 
World War. 

The Roman Empire died because it depended too much on the central government in Rome. 
All the roads, no matter they led to Rome or away from it, only helped to increase the coordination 
number of the capital city of the empire. Every city in a robust empire, according to the percolation 
theory, has to be linked to its local nuclei city. With a single nucleus the network has only one cell, 
and that is too small for a network to be able to withstand any attack or to be robust. This is 
so disregarding whether the network is large or small, and in fact the larger it is the worse it will 
become. In this respect the United States, with its various states and local governments, is the best 
model that we have. The Brtish Empire, together with all other empires that are its contemporary, 
has already expired. And the ends of all empires in that fashion seems to say something similar to 
our idea of a robust structure. All of them had colonial territories, but non of these were treated as 
equals by the ruling countries. The European Union could fare better if it learned from them, as 
well as from mistakes that the U.S. had made. 
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§ 8.1 Object-location 


The object location problem is geometrical in nature. My design exercise (Tiyapan, 1995, KNT2(ii)) 
during my MSc course, supervised by Dr. Zarrop of the Control Systems Centre here at UMIST, is 
included here in § E.4. Figure 15 to 17 which replace the original ones are produced by the original 
respective programs with minor correction, namely in the drawing of the lower two sub-figures in 
each one of them. In addition, Figure 8 and N give an idea where the mask is relative to the object 
at each instance of time. 


Object Object Profile 


Pixels overlapped 


Figure 8.1 is the object location of a square “5 
object by a square mask of equal size. Figure 
8.1 uses the same program which produces 
Figure 15 of § E.4. It shows the square object, x 
the hill derived from the area of intersection 
with respect to the position of the mask, and 
the z- and y-axes of the mask with respect tog 
time. 


Figure 8.1 Square object located by a 


square mask.. "9 200 400 600 800 1000 ) 200 400 600 800 1000 
Steps Steps 
Object N=10 N= 100 
10 1.———_._— 10 
5 [ 5 5 
Figure 8.2 shows the object together with 0 0 0 
eight snapshots of the mask at different time.  -s sz c 
While doing a random searching the program =~}, * a -19h 1 -10{ , , 
may at times think that it has found the ob- N= 2 oo Neue io 
ject somewhere and jumps to that location, E é HB : 
only to realise later the mistake. This isdue , EE ‘ ‘5 aR 
to the interference by the noise. On the other _, “ 4 
hand if it knows that it is doing the random —__1y igh —_: __ 46 
Fs ‘ sant % -10 0 -10 0 10 -10 0 
searching, it retains the latest position that it =, N= 500 oN oN 
thinks is the correct one. All of this is shown 5 
5 . eel 5 5 
in Figure 8.1 and 8.2. : ; is : iss 
Figure 8.2 A snapshot of of the object and = +s 5 5 
eight others of the mask.. 105, 105, -19)5 5 7 


The paper reproduced in § E.9 has been submitted to be considered for presentation at the 7" 
International Symposium on Dynamic Games and Applications which was to be held in Japan on 
16-18 December 1996. In April 1996 I submitted an extended abstract of the same to the organising 
committee and it was accepted. I thereby emailed to Dr. Zarrop to ask whether he would mind 
being a coauthor of the finished paper since it was him who gave me advises on the work which 
was the product of the design exercise course that I did with him, he said he would be happy to be 
one and I wrote to thank him. But upon seeing the finished work he wrote to tell me to be its sole 
author instead because he sees nothing new in it and, without giving suggestions on how it could 
be improved, rather have nothing to do with it. I duly sent the manuscript with his name taken out 
in July and it was not accepted. 

A work by Tiyapan (1996, KNT2(ii)) on object-location problem is reproduced in § E.14 because 
the original manuscript and results is irretrievably lost. It appears in the proceedings of the ATACS- 
96 conference. This conference is one among the series of mock conferences under the name of 
Advance Theory and Application of Control Systems, which is organised each year at various places 
in Japan by laboratories which are historically of the same family. ATACS-96 was participated by 
14 research groups or laboratories from six different universities, with altogether 102 participants, 
48 of whom gave a presentation. ATACS-97 has 42 paper presentations and 130 participants from 
16 research groups of altogether ten universities. ATACS-98 was participated by 114 people from 
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13 research groups of five universities, among whom 38 people were speakers. These are the three 
ATACS conferences I attended, namely the one in 1996 at Izu Peninsula in Shizuoka Prefecture 
and the one in 1998 at Lake Kawakuchi in Yamanashi Prefecture both of which are in the excellent 
setting of the Fuji-Hakone-Izu National Park, and in 1997 at a youth centre bordering on the lovable 
Yoyogi Park in the bustling Shibuya District of Tokyo. 


To summarise, the RLS technique with random searching employed in § E.14 is developed 
further to accommodate back-stepping which helps produce a better result as shown in § E.17. The 
latter paper has been presented at an international conference in Singapore (Tiyapan, 1997, KNT2(ii)) 
and then as a seminar at TIT on 3"? January 1998. The former is the second joint conference of the 
International Simulation Societies called World Congress on Systems Simulation. It was organised by 
IEEE Singapore Section, the Society for Computer Simulation Europe, and the Society for Computer 
Simulation International. I gave a presentation on the last session, Session 21 on Potpourri, of the 
last day of the conference. As I did not buy the conference proceedings because it did not contain 
my paper except as inserted addendum pages copies of which I already had, I have no idea what 
the papers of the other presenters look like. The paper has been reviewed by two reviewers both of 
whom gave it a good for technical quality and an average for importance. For both the originality 
and the relevance to WCSS97, one gives a good while the other an average. The paper has been 
unanimously marginally accepted with the readability and presentation scoring somewhere between 
below average and average. One reviewer commented, ‘The abstract is poor and too short. The set 
of references is also very poor. There is no conclusion to the paper! Previous remarks affect the 
quality of the paper, but it still remains in [sic] interesting study. The algorithm of the last section 
should be structed [sic]. Considering what I see of the paper I suggest that the author use a classical 
chart to present his algorithm. More precision (description) must be added to the functions an [sic] 
variables in equations. Some are described some are not. Before the algorithm section the author 
should give more precision concerning the random search and he could add references. Though my 
english is not very good, I think that the text should be improved (have it re-read by a native 
or eglish teacher if possible, or at least by another colleague.[sic]’ The other gave a more succinct 
comment, ‘The paper seems to be in-complete. The problem under consideration should be defined 
more clearly. Advantages of the proposed algorithm should be discussed in more details. Practical 
problems that could be solved by the proposed algorithm should be discussed. Conclusions should 
be added.’ None of these suggestions I had followed because Dr. Helen D. Karatza the Chair for 
paper review wrote saying that IEEE Singapore would inform me about the final decision for my 
paper but I heard nothing from the latter although they told me later that they had sent a letter to 
me at the Furuta Laboratory, TIT. Interestingly enough I find a note in Japanese received from Ms. 
Shinata dated 7** March just now among the document in I keep. She was then the secretary of 
Professor Furuta. The note says that he could not help with the cost of the conference since he has 
no idea what kind of paper I had written. Only now that it occurs to me that a few month earlier 
on I did actually present a similar paper which contains two-third of the contents in a conference 
which was organised by himself (cf Tiyapan, 1996, KNT2qi), or § E.14)! That aside, I have thus far 
come to the conclusion that the purpose of the organiser of a conference is in order to make money. 


The following summarises my presentation at the WCSS97 conference. The original ideas of 
the research RLS algorithm for object-location problems come from an example in a design-exercise 
for an M.Sc. course in Control and Information Technology which I did with Dr. M. B. Zarrop at 
the Control System Centre, UMIST, during 1994-1995. 


The same paper I also presented in a seminar of the Furuta Laboratory on 3"? January 1998 
. The manner of the presentation is recaptured in the following. The performance function of an 
object location problem can be represented by the area of the intersection between the object and 
and a randomly placed mask as shown in Figure 8.3 and 8.4. The former shows the hill positioned 
relative to the centre of gravity of the object, while the latter shows the contour of the hill resulted 
from a square object. 
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Both the object and the mask are within 
the domain D. The mask is placed in such 
a way as to maximise the area of its inter- 
section with the object. The object and the 
mask may have any shape, and their shapes 
can differ. 


Figure 8.3 The hill in an object location 
problem.. 


Figure 8.4 (a) Area of the intersection between square object and a square mask, (b) contour 
of the hill thus obtained. 


The procedure used in the paper I presented at the ATACS96 conference is shown in Figure 
8.5. 
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Initialise parameters 


|e 


Y 


Random search 


This procedure does a random searching when- 
ever the position of a hill is lost. Once the hill 
is found it switches over to a recursive least 
square subroutine. 


Figure 8.5 RLS procedure with random search. 


Then Figure 8.6 shows the improved algorithm in the paper presented today. 


RLS 


This is the same as the procedure in Figure 
8.5 except that whenever losing sight of the 
hill it recursively steps back a step at a time 
for the maximum of three times or until the 
hill is found again. If the hill is still not found 
then it switches to do random searching as the 
other procedure does. 


three steps Random search 


back—stepping? 


back-step Figure 8.6 RLS procedure with random search 
and back-stepping.. 


The simulation mentioned earlier on, namely where Figure 8.1 is, has the methodology as shown 
in Algorithm 8.1. Here o? is the dither signal variance, 0? the noise variance, p a random number, 
O the object, I the image, I(n) a square identity matrix of dimension n and d the dimension of our 
space which lies between +d in both directions. The program in § A.1 is based on this algorithm. 
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Algorithm 8.1 Object location algorithm. Q+G@ 
Te [l(6) — (wa'P)/(A + 2'Px)] /A; 


Create the object; 6 4. x(y — 2'9); 


for each step do a+; 

6 & (303)?(-1, 1); a2 + 093 

pe —b;/(2a1) + 63 bi + 633 

g + —be/(2a2) + 6; bo + 443 

y¥e ONT; v+a,(0,1); else 
yoytys tett+l; 

if y > 1 then pcP; 
« ¢ [p’,@’,p,4,1,1]' q-Q; 
tett+l; bi + —2ai(—d, d); 
pe —b1/(2a1); bo —2a2(—d, d); 
q ¢ —b2/(2a2); endif 
Pep; endfor Q 


§ 8.2 Economic modelling 


My interest in the modelling of economic systems started immediately following the devaluation of 
the thai Baht in July 1997, which in turn triggered the economic collapse of east Asian countries. 
But the seed of this interest may have been germinated nearly seven years earlier when I went to 
Budapest for a job training through a program by the Association Internationale des Etudiants en 
Sciences Economiques et Commerciales, aka ATESEC. It was there that I experienced firsthand an 
economic system with inherent potential, but which was ailing and struggling to survive. It was 
also there that I have come to know the word hard currency and learnt about terrible consequences 
to people in a country whose money is otherwise from being hard. Some of these consequences are 
the proliferation of black markets where money is illegally traded for hard currencies like the US 
Dollar or Deutsch Mark, and the ever soaring inflation rate. In Poland at that time, for example, the 
inflation is above 700 percents. In such an unstable society stealing is a matter of fact in everyday 
life. Robbery becomes so widespread that the police no longer bother to catch robbers, and this 
is so much a more decent thing to do since otherwise there would have been no place to put them 
in in the first place. This I know because it was in Poland around June 1990 that I was robbed 
of nearly all of my personal belongings. Afterwards when I have become initiated to the theory of 
percolation, I ascribe the transition between a hard and a soft currency to the percolative process. 
Now I still see this, as well as the changeover of the eastern bloc countries, as a phase transition. 

My brief presentation at a conference in Japan (Tiyapan, 1997, KNT2(ii)) has been warmly 
received by some of the experts who attended, despite criticism from a member of the organising 
committee before the presentation. My belief was, and still is, quite different from the conventional 
theory as to the cause of this national mishap. Instead of seeing the attack on thai Baht made 
by an american hedge fund which is run by George Soros, I put most of blame on other seemingly 
unrelated factors that deprive Thailand of essential robustness in many of its fundamental structures, 
particularly on too much centralisation towards Bangkok and the percolated traffic networks in that 
city which came close to a standstill. Others argue that the Soros hedge fund represents a corporate 
crime against a nation because no matter whether it is the true cause of the catastrophy or not the 
intention of attack was there. But such is not the kind of matter which concerns us here. In essence, 
I give all the value to the structural soundness of a system and the infrastructures and none to any 
single occurence or mistake in management decision. A country, I argued, will run sound if if it 
has a potential to do so, and not otherwise. The potential of a country depends on such things in 
the background as all the infrastructures including transportation and telecommunication systems, 
education, forest, and decentralisation. 

The self-sufficiency practice recommended by King Bhumibolof Thailand in his annual speech 
to the thai people on his birthday in the December following the crisis is the very core idea of 
decentralisation in disguise, namely that of local management which will ultimately lead towards 
local government. In his speech he told the Thai people to live a self-sufficient life, to grow vegetables 
in the backyard enough for one’s own need, and to sell and make a business out of it if one has more. 
I believe his idea goes deeper and his teaching more a parody from the necessity from him to remain 
impartial even in the face of a crisis. In short, the self-sufficient of oneself will lead to that of one’s 
family, village, town, district, province, and finally the country. The Constitutional Laws have been 
changed to favour this, which I think is a crucial step. 
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There has been a complete turnaround in the policy in Thailand now compared with what had 
been before the 1997 crisis. Then it was everything to be centralised in Bangkok. Every prosperity, 
you name it, must go to the capital, and every policy out from it. It had been so for a long time, for 
many generations, and democracy did not much improved it. When Smyth (1898) lived in Thailand 
in the 1890’s he saw what I had seen one century later in the 1990’s, that everything beautiful in 
Bangkok comes from, and at the expense of, the rest of the country which is left to be poor. Anyone 
travelling in the city even today can see quite easily that Bangkok by no mean represents Thailand. 
With this kind of policy, no doubt everyone tries to get to Bangkok. This worsen its problems 
further. Nothing that I may say on this point can be better than the following account made by 
Smyth from the work already quoted. 

I am certain that the Government in Bangkok have never realised the disastrous effect 

which the system had on the distant province. The revenue each year was maintained at 

the proper figure, and therefore no questions were asked. The money went to Bangkok, 

and the P. W. D. spent it in improving the look of the town. Visitors were impressed 

with what was being done in Bangkok, and went away persuaded that Siam was an 

enlightened country. The poverty-sticken condition of the provinces did not come under 

their notice. ‘That’s all our money,’ cried a disconsolate provincial Government to me, 

spreading wide his fingers towards a canal in Bangkok beeautifully embanked, with a 

charming road on either side. ‘I have had to roof my court-house at my own expense.’ 


Fifty years on, the canals in question started to deteriorate and fifty years later either have 
been filled to make more roads or left a dirty sewer. In 1992 there was a plan made by the Bangkok 
Metropolitan Administration to construct wastewater treatment plants around Bangkok. The con- 
struction was to be in two phases each of which worths 5,000 bahts, and equivalent of 120 million 
pounds sterling. At that time I was working at the Loxley International Public Company in Bangkok 
in the capacity of a sales engineer. In the second bidding for this turn-key project I was transfered 
to the Business Development Division to work as the estimator of the project, reporting directly to 
Mr. Ronald James Savage who was one among the Board of Directors of the company. Loxley joined 
force with several consultants and contractors to bid for this project, and as the company was to 
provide all the necessary equipments and technologies my job was to search all corners of the world 
for everything everyone would need. It was chalenging, but then I was a workaholics so it was all I 
needed. In the end we did not win the project, however, so that is as much as I have to say about 
it except for one thing, that is that I think the wastewater treatment project came far too late and 
was still not completed when the 1997 crisis occured. Seemingly unrelated, in the present argument 
and together with other things such as traffic, education, decentralisation, it has got everything to 
do with that crisis. 

Now the policy has turned into that which lets the remote parts of the country manage their 
own funds and make their own decisions. There is, for example, a scheme of a product a village 
that fosters local artisans. As a result, local heritage becomes fad where is only five years ago it 
was fiction, something to forget, not to think about. If there is no hiccough in this process or a 
coup d’état of some sort, then the policy of Thailand now is by far sounder than it ever had been. 
Therefore Thailand to me now is in a better shape than it used to be when it was still dubbed a tiger 
or the East. However people often think otherwise. I always find myself involved in a controversial 
or difficult issue, and on the wrong side thereof. Before the crisis, for instance, when most people 
looked up to America with hopeful eyes I always said to my colleagues, ‘we should not put our whole 
faith in America’, that Thailand should not rely too much on any other countries, and I was looked 
at questioningly. After 1997 I said, ‘it’s not half the fault of the Americans or anyone else but us’, 
and I was eyed with disgust. The hedgefund which attacked the Thai Baht in 1997 was only an 
instrument, not the reason, for what happened thereafter. It answer the when question, but the 
more important why question has already been answered long before that (cf Smyth, 1898). I can 
say this because as easly as 1990 while the Thai economy was in the bull I wondered myself why it 
has not collapsed because, as I often said when discussing with my colleagues engineering students, 
according to my reasoning it should. Immediately after the disastrous event while the country was 
in the blue and I was in Japan I told myself that I had already known why it happened, now I knew 
when and how it did. 

What followed was a period of a few years when the whole country, noticeably Bangkok, was 
so quiet you would not believe. For some times the country was a paradise for travellers. Everything 
was cheap and nothing was not on sale. Instead of increasing, I felt that on the whole crimes had 
reduced, perhaps because such tragic events always shook the hearts of people, the thieves’ and the 
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gentles’ alike. The Tourism Authority of Thailand coined this marvellous word Amazing Thailand, 
to promote tourism in Thailand abroad, which fitted the mood of the country like a glove because 
everyone felt like staring wide-eyed with disbelief at what had happened and what was happening 
around them. I was equally amazed at what was happening around me when I visitted Thailand 
from Japan, but not at what had happened because, like the next great Tokyo earthquake, I had 
been expecting it for quite a while before I got tired and stopped thinking about it. 

An analogy of distributed government can be seen in computer science under such terms as 
distributed systems, parallel processing, and object-oriented programming. I see it as essential, if 
not as the only way, towards a sound and robust economic systems. 

At this ATACS conference in Tokyo in October 1997 I explained economic modelling as follows. 


world and 


economics 


macroeconomic and 
microeconomic parameters 


parameters of the 
overall model 


i characteristics of 
The economics of the world can be represented by macro- 


economic and microeconomic parameters. Together these 
two make up the parameters of the overall model and de- 
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Figure 8.7 Economical models.. 


Later that year I submitted two papers (Tiyapan, 1997, KNT2(i) and KNT2(ii)) electronically to 
a journal, the American Journal of Physics I think it was. For the reason that both papers were 
products of my personal research interest which has nothing to do with my commitment to the Tokyo 
Institute of Technology, I could only spend a meagre amount of time on them. As a result, the work 
was too preliminary and there was no reply from the publisher except the first computer-generated 
message saying that they have received my files. No matter how poor my papers were, I felt that to 
get a negative feedback from an editor was already bad enough, but to get no reply was worse. 

In the light of the argument above, what Hammond (1998) called a Market World corresponds 
to the case where the globalisation expands smoothly and permeates all countries from developed 
to third world to form a single unbroken cluster. What he called a Fortress World corresponds to 
the world where the the free market only benefits some countries while the rest is left deprived. 
The poorer countries encroach on the richer ones like water encroaching the residual oil in an oil 
reservoir; islands of prosperity surrounded by seas of poverty. Yet his third and last vision or version 
of the world, the Transformed World, would correspond to a changed structured of the network of 
culture and economy which gives a more robust system and accommodates all the needs of the future 
generations. Among the things that are changed in this case are the cultural norms and values. 

Cultures are like languages. Like switching from one language to another, when travelling to 
another country one switches from one frame of mind into another. Unless this is properly done 
there will always be some adverse symptoms to experience, and culture shocks, which are common in 
novices, become less so in experts. In the languages of cultures, when we deal with the Japanese’s we 
should keep as much a polite manner as possible and take our responsiblilities to the other party as 
seriously as possible regardless to what the small prints might or might not say. On the other hand 
if we are to conduct our business with the Americans, for instance, we should question every move. 
Generally speaking while the West favours contracts, the East has been run mainly by personal 
relations. The catch came when the latter party adopted so many of the ways and ideas of the 
former, and these got improperly mixed together with its own ways of thinking which are different 
to produce an incoherent, unstable and insecure structure. Stevenson (1895) when travelling out of 
himself to the United States in 1879 came across a mexican who was scruple enough to knowingly 
sign an imperfect paper for fear that the other party might think that he doubt his words otherwise. 
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The scruple sounds odd, he said, because we “have been brought up to understand all business as 
a competition in fraud, and honesty itself to be a virtue which regards the carrying out, but not 
the creation, of agreements.” This no doubt answers the question why the 1994 economic crisis in 
Mexico occurred. 

Because there is more to the economic well being of a country than economic figures can tell, 
one needs to look around in order to to find clues to what is going wrong. For this, the richest 
source is in the literary literatures, some of which had seeped out through the unconscious minds 
of some of the most experienced and sensitive minds. Also, at least in the field of economics the 
study of science and the social study should go along side-by-side. More than economic figures 
and those things which meet the eyes, studies in this area should take into account hidden factors, 
for example education, centralisation and policy in general, and turn them into a form which can 
be numerically or theoretically studied. Centralisation always adversely effects the economics, for 
instance the greater control by the central state of government expenditure as well as growth of 
the public sector Germany immediately after the First World War is followed by the hyperinflation 
which began in summer 1922 (cf James, 1986). 

Descriptions of economic crises usually resemble percolation, eventhough or especially when 
they come from someone who has no ideas of percolation in his mind. For example, Rodelet and 
Sachs (2000) think that small events at times have large consequences. They talk about crisis of 
success, that both the collapse of Mexico in 1995 and of Korea in 1997 came after a prolonged period 
of euphoria. In Thailand, for instance, indicators in the third quarter of 1997 suggested nothing like 
a financial meltdown. On the other hand, while Mlesi-Ferretti and Razin (2000) mention a ‘perfectly 
forseen speculative attack’ as the thing which triggered the crisis in this case, there is no question 
about the network having already greatly weakened before the attack. 

One has to distinguish things which trigger from things which cause. One can be very much 
certain that crises of this scale must come from a very slow process which works on the structure 
within. It may be true that delaying bubbles from bursting this way even results in a deeper crisis 
afterwards. 


9 


§ 9. Addenda 


§ 9.1 Sociology 


The nature of discoveries and progresses in science is according to Bacon (Francis Bacon, 1620) a 
birth of Time rather than a birth of Wit. This is the same idea of percolation and the description 
he gave is the very picture of the theory. According to him major scientific progresses come in 
revolutions which are sparsely distributed in both time and regions. There have only been three 
periods of major progress out of the five and twenty centuries over which the memory and learning of 
men extends, namely the Greeks, the Romans and the nations of Western Europe. These are narrow 
limits of time, the periods in between of which are unfavourable to development. A discovery or an 
invention, then, comes as a chance accident in the scale of an individual, and as a certainty when 
looking from a distance. 

When the time is right and all the hidden momentum built up, theories will come on by itself 
as arule. This does not negate the excellence of an individual, but in a society where there are 
enough multitude of individuals the show will always go on, with or without a particular genius. 
This idea can very well explain cases of multiple discoveries. According to Kekulé in his Benzolfest 
speech in 1890, when he ascribed his conception of the cyclic nature of Benzene in dreams, certain 
ideas at certain times are in the air and if one man does not enunciate them, other will do so soon 
afterwards. 

To see the relationship of this with percolation it is possible to look at two different things 
in turn, first at the discoveries and then at the discoverers. With a unit being that of a discovery 
the connection to percolation is that big discoveries come as connections of other smaller and less 
obvious ones. A theory often has more than one perspective, and which one of them comes to the 
fore first depends much on which combination happens to percolate through first. The discoveries of 
Schrédinger and Heisenberg in Quantum Physics can bear witness to this both in the combination 
and the multiple discoveries parts of this argument. 

Let us turn our attention now to the scientist and look at the one who does the discovering 
instead. The theory of percolation tells us that at the point of discovery he is by no mean the sole 
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integral ingredient. If he does not do it, then someone else will certainly do. In order to see this, I 
did four simulations for the cell, bond, vertice, and edge percolations on a two-dimensional Voronoi 
network and then another four with the same respective blockage of each case but considering the 
inverse phase instead. The number of units considered for the four cases are n, = 200, np = 416, 
Ny = 298, and n, = 426. With the order of simulations as described above, at just one step before 
percolation occurs there are respectively 10.6, 13.4, 11.5, 1.1, 11.24, 10.0, 19.4, and 7.9 percents 
among the remaining units which will readily trigger the onset of percolation. In other words, these 
are atoms which are able to link up existing clusters and form a percolating cluster. 

The formation of mobs is an interesting phenomon comparable with phase change in physice. 
What happens is that an agglomerate of individuals becomes one and a single creature, the un- 
derlying mechanism of which still baffles any effort towards understanding it. Likely enough it has 
got something to do with psychology and the mind. But to me at least, the phenomenon is per- 
colative. Having gained some acceptance from my previous writings (Tiyapan, 1995-1996, KNT2(ii), 
KNT2(ii) and [kbukt], respectively §’s E.5, E.6 and E.7) I gave my new work which briefly discusses 
the mechanism underlying the formation of mobs to an editor of the Sakkayaphab journal whom I 
know. At that time a political turmoil unequal in its degree and extent has been going on for five 
years. Whether by fate or by design there has been a successful but tragic use of mob in Bangkok. 
The word mob has joined the list of those synonym to distrust, namely communist or, in western 
community now for that matter, Islam and evil. Whether because of this or something else, the 
article (Tiyapan, 1996, KNT2(ii), or § E.15) simply and mysteriously got lost; no one would admit 
having seen it, and the translation of another subsequent article of mine (1996, KNT2(ii), or § E.16) 
has not been without a noticeable negligence. Thus to me distrust is also percolative. The list of 
things one finds over-distrusted without reasonable explanation goes on indefinitely, homosexuality, 
communism, etc. The same seems to be the case with bad habits. My father used to teach me using 
the following poem, 

Bad habit gathers by unseen degree 

like brook makes river, river runs to sea. 


Looking back, it could have been the title of that article, on pragmatists and idealists, which 
has somehow convinced the editors into believing that it was political which to me is nonsensical. 
I only meant literary, even if at times philosophical. I include it here because it contains a curve 
showing a critical emotional transition. 

The formation of the United States, the European Union, or the Commonwealth comes from 
the trust which acts to join countries together like glue boxes in TEX. Like all binding forces, trust 
is mutual and spreads in the same way as a growing cluster does. The cluster grows bigger as one 
or more members are added, and it becomes stronger as the level of the mutual trust increases. In 
a similar way, distrust is also mutual and also spreads. If I distrust you and you distrust me, I will 
make sure that I remain as far away from you as possible while you will certainly avoid me by all 
means in return. 

Only these two are possible, so there are only two phases to consider, that of trust and distrust. 
The relationship where one trusts while the other distrusts would not be stable, since the former 
will soon learn to join the latter. Trust forms clusters of one phase, distrust another. The size of 
these clusters vary in a way similar to those in percolation of geometrical networks. The strength 
of the glue is analogous to the probability either of becoming or remaining a member of a cluster. 

The rise of dictators, the proliferation of weapons of mass destruction, etc, these things I 
believe are the products of changes of something hidden within the underlying structure. Unless 
we find out what is happing in the background, these things will unavoidably occur. I believe that 
this unseen thing behind the scene is governed by some phenomena similar to that of percolation. I 
think that the key towards understanding many unexplainable phenomena is to investigate, in the 
light of the percolation theory, the working of agglomeration of countries or states like those of the 
United States and the European Union. 

The believe that scientific discoveries are a birth of time, rather than of wit (cf Larsen, 1993), is 
the same as the idea of percolation. We know because we remember. And all the various discoveries 
of our time together with the knowledge we possess of the past bring us closer to another discovery. 
Scientific discoveries, then, is the collective product of humanity rather than property of a single 
person (cf Merton, 1965). 

And because all species are also the product of percolation in time, our knowledge and con- 
sciousness, too, are the product of the universe. One may say that it is a personification when we 
refer to a collective noun, for instance a mob, as an individual. But the truth is that, under the 
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percolation theory, it is in fact a separate individual without any need for the use of a simile. The 
renormalisation group theory tells us that there exists a structure in a bigger scale that behaves like 
the individual components that comprise it. It seems, therefore, that for humans these collective 
beings of ours are still primitive compared with each of us as an individual. This is the reason why, 
whenever we come together, we alway make wars. In our case, then, we seem to be conscientiously 
percolated only individually not collectively. In the case of bees, on the other hand, it is the other 
way round. This is why a colony of bees does things which make far better sense than a bee does. 
But one can not say that even a colony of bees has consciousness, because there seems to be no 
morals in what it does. I do not know whether there are other beings in the universe both the 
collective and individual beings of whom have percolated conscientiously. But I believe they exist, 
in which case they should be more intelligent than us, though this is by no means necessarily the 
case. 
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§ 9.2 Control systems 


The following are relevant subjects in control systems. I have one first degree and one master degree 
in the subject. From 1995 to 1999 I did a doctorate course in Tokyo but decided to quit after three 
years. Research in this area is still one of the topics that I would like to do in the future. One year 
before leaving Japan my research results must have look quite well because on 22”¢ April 1998 my 
supervisor Professor Katsuhisa Furuta wrote me an email which says, ‘Your reports are very nice! 
Excellent results. I am verymuch [sic] impressed. We can talk the results.’, signed ‘Furuta’. And 
again on 2”? June 1998 another email, ‘Dear mr.kit [sic] please come and explain your synchronous 
motor. Where shall we introduce the controller?’, signed ‘Katsuhisa Furuta’. 


Although it is true that control systems is always used in military and misiles, one must not 
forget that it is also important for travelling in space and is likely to be of a great help to those 
space settlers searching for habitable planets in the future. Control system is used much in electrical, 
mechanical, and chemical engineering, with the typical time constant increasing in that order. 


This section is in a way a brief recapture of what I did during my PhD study at TIT, Japan. 
I collected my works in a form of Technical Reports and gave a copy each to Professor Furuta who 
was my supervisor then. Sometimes when there was a spare copy left I would give it to another 
senior staff who worked in the Minami 5 building where the Furuta lab used to be. The computer 
files of these reports is no longer available even to myself. A great number of figures from simulation 
results in these reports are not reproducible here without the Simulink facility on Matlab. The first 
of such report was dated 16%” July 1998 but the works it contains started around the beginning of 
April of the same year. I studied systems listed in a book by Khalil (1996). One of these systems 
(Exercise 1.17 (4)) is 


fy = 1+ £2 — 2% (\%1| + |z2)), (34)ix 
be = —22, + to — £2 (\r1| +|22|) + u, (35)ix 


where u is the input to the system and 2; and x2 the state variables. Because the simultaneous 
equations 21 + £2 — x (|a1| + |z2|) = 0 and —221 + xq — x2 (|21| + |v2|) = 0 are ill-formed, there 
can be no equilibrium points. 


Pal 


In Figuer 9.1 is shown the phase plane of the system 
described by Equations 9.34 and 9.35 when there is no 
input. The limit cycle in Figure 9.1 is elliptical with | 
the major axis along the x2-axis. When the control | 
input is u = sgn(#1 + x2) the phase plane looks like 
Figure 9.2 (a) and when u = —(@1 + 22)+sgn(21 +22) 
Figure 9.2 (b). 
Figure 9.1 Phase plane of Equations 9.34 and 9.35 
with no input. 
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(a) (b) 

When there is no control Figure 9.1 shows that the equilibrium point at the origin is an unstable 
focus and there is a limit cycle circling around the origin. This limit cycle is slightly larger in the 
x2 direction than in the x, direction. Every trajectory starting from an initial point other than the 
origin goes to and then stays on this limit cycle. With the control input u = sgn(a1 + v2) there is 
a discontinuity on the surface of the hyperplane s = 7; + #2 = 0. All trajectories still converge to 
the limit cycle although the latter is distorted where it intersects the hyperplane. There is no node 
and every point on the hyperplane and inside the limit cycle is an unstable node. All these also 
hold when the control input is u = —(#1 +22) +sgn(#1 + x2) and there are two additional nodes as 
shown in Figure 9.2 (b). 

During September and October 1996 I gave a series of seminars on a topic related to polytopes 
of polynomials. The topic I chose was recent (Pujara, 1996) and rather difficult for me but for 
me it was a success because the methods introduced was discussed weekly for at least a month 
in a series of the subsequent seminars, and they resulted in the idea being successfully applied, 
in the context of Pulse Width Modulation, by one of the students who attended in his Ph.D. 
work. The following is a recapture of the original seminar I gave. The discussions, which was 
the most interesting part in these seminars, are lost. A pseudoboundary is defined to be the set 
of all polynomials in the polytope each of which has at least one zero on the imaginary axis. A 
section of the pseudoboundary corresponding to wo is a polytope whose vertices lie in the exposed 
2-d faces of the given polytope. Pujara (1996) in his study of the stability boundary problem gave 
an algorithm to generate all the vertex polynomials of any section of the pseudoboundary of a 
polytope. A polytope is stable if and only if its exposed edges are stable. Interval polynomials are 
a hyperrectangle in coefficient space with edges parallel to the coordinate axis. Kharitonov’s results 
is that if a polynomial family consists of interval polynomials, then the stability of just four extreme 
polynomials is both necessary and sufficient for the stability of the entire rectangle. Consider the 
polynomial f(s,q) = s” + a1(q)s™ 1 + ao(q)s”-? +... + Gn_1(q)s + Gn(q) which produces an r- 
dimensional polytope P in R"+!. Here a;(q), i = 1 to n, are real affine coefficients and g; <q <q} 
for every q@, 1 <i<vr. For fixed q, this polynomial is a point in R"*+' whose coordinates are the 
coefficients of the polynomials. The pseudoboundary, , is the set of polynomials in the polytope P 
each of which has at least one zero on the imaginary axis. The section, (0, of 8 at wo consists of those 
polynomials each of which has a zero at jwo. If Z € C+! is a set of all zeros of this polynomial, 
then wo € W if and only if dg(jwo) € P such that g(jwo) = 0. Every B(jwo) is a polytope which 
has its vertices on the exposed 2-d faces of P, which in turn can be explicitely determined. 


Theorem. (Pujara, 1996) The section of the pseudoboundary £ of a polytope P at any frequency 
wo is a polytope. The vertices of this pseudoboundary lie in the exposed 2-d faces of the polytope 
P. 
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The state equations of a dc motor are 


dt (36)i< 


where 7 is the armagure current, u the voltage, R the resistance, L the inductance, J the moment 


of inertia, and w the angular speed. The constant excitation flux @ results in the torque ki and the 
back e.m.f. kw. 
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My technical report number 6 (1998) I studied the control of synchronous machines. In the 
introduction I wrote to Professor Furuta to say that he may use any of the material without ac- 
knowledging me. I see it fits to describe briefly here some of the results because I initiated and 
carried out the work, as is normally the case with most of my researches done while in Japan. The 
electrical frequency of such machines synchronises with the mechanical speed. However it is more 
convenient to express angles in electrical unit, i.e. electrical angle, rather than in mechanical unit, 
i.e. mechanical angle, for the reason that a synchronous machine can have more than two poles. 
Whichever is the case, one may consider only a single pair of poles and then consider the electrical, 
mechanical, and magnetic conditions, which are associated with all the other pole pairs as repetitions 
of those for the pair being considered (cf Fitzgerald et al, 1971). 

The electrical and the mechanical angles of a generator are related by the relation 6, = 44m, 
where @, is the electrical angle of the output, @,, is the angle of the rotating shaft, and p is the 
number of poles of the machine. The frequency of the voltage is f = $34 Hz, where n is the 
mechanical speed in rpm and % the speed in revolution per second. The radian frequency w of the 
voltage is we = Swm, where wm is the mechanical speed in radian per second. 

Figure 9.5 shows the dynamics of the me- 
chanical and the electrical angles of a syn- 
chronous machine with three pair of poles. 

The solid line is the mechanical, while the 
dash-dot line the electrical rotation. The me- 
chanical and the electrical rotation of a syn- : 
chronous machine are juxtaposed in Figure brat asacts 
9.5. In power system engineering one wants d 


to control the power and the frequency. Ex- t ae ae ‘ 
amples of controllers are speed govenors, ac- mig : : 
tuators, regulators, and signal transducers. _»2 : ; 
Speed govenors can be described by Af -K = 2 


T,, where Af is the change in frequency, K i] i 
the gain, and Tz, the load torque. The other yh 
controllers mentioned are high-gain power-amplif 4; 
which convert things like position, oil pres- L 
sure, and electricity into valve positions. ‘ 


Figure 9.5 Dynamics of the mechanical and 
the electrical angles. 


(37)ix; 
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The change in load in the power-frequency control of a synchronous generator can either be 
a load shedding where the load decreases causing the frequency to increase, a generator shedding 
where the load increases causing the frequency to decrease, or a short circuit where the generator is 
suddenly disconnected and as a result the frequency increases to the maximum value. The effects 
caused by the load change are related to the equation J ae = Tpmu — Tz, where J is the moment 
of inertia of the rotating mass, @ the angular position of the rotating mass, Tpyj, the prime-mover 
torque, and Tg the electrical torque. 

In 1998 I presented a paper (§ E.22) at the ATAC-98 conference in Japan. The objectives of 
that study are to study the effects of a sign function input, to study the effects of € in a singularly 
perturbed system, and to study a variable structure singularly perturbed system in other words 
those which have a sign function in the control input. Singular perturbation of any system implies 
that it has e; terms multiplying the term x and that these terms ¢; approach zero. One can write 


down a given transfer function T(s) in the state space forms x = E~‘ Ax + E~'Bu and y = Cx+D. 
2(s+5)(s7+4s+4+29 


For example, T(s) = Gyinyetiys7 85120) 


can be represented by the above state equations with 


-8§ -5 1 1.25 0 100 0 
_| 4 0 0 0 ms 0 {0 1 0 0 ae 
A= 0 0-11 —25/° B= 2.82843 |’ E= 0010/7 C =[-2.83 1.6 0.71 0.88], 
0 0 4 0 0 000 1 
Then if we rewrite E as 
100 0 
_ {0 1 0 0 
Be 001 Of’ 
000. 


we can study the perturbation effect of the singularly in € as it decreases from ¢ < 1 towardse < 1, 
namely 


2(s + 10)(s? + 4s + 29) 


2516) 2 ee 
€ = 0.5-1(8) = Tee + 20)(s + 2.2084)(s + 8.7015) 
=n 2s? + 108s? + 458s + 2900 
EN ~ (s2 + 8s + 20)(s?2 + 11s + 100) 
2s* + 1008s? + 4058s + 29000 
= 0.01.7 = —. Sa 
= NOEs) (s? + 8s + 20)(s? + 11s + 1000) 
2s? +1 244 2.9 x 1052. 
«= 0.001,7(¢) = 282 + 100088? + 400588 + (2.9 x 1052.9) 


s* + 195° + 101085? + 80220s + (2 x 10°) 
2s* + 1000088? + 4000585 + (2.9 x 10°) 


Si O00 a) eee 
€ = 0.0001, (8) = [7953+ Cool x 10)s + (8.0022 x 10°)s + (2x 10%) 


To summarise the root locus behaviour when e decreases, two complex zeros are fixed, that is 
s? + 4s + 29. Two complex poles described by s? + 8s + 20 remain the same throughout. The zero 
on the real axis moves left. The two poles on the real axis moves toward each other. At the point 
when the moving zero passes the pole on its left hand side the root locus changes its characteristics. 

Even as early as November 1998 I have decided that Control Systems will not be the only area 
that I will do researches in, as can be seen in the title of the technical report number two (1998) 
which has the words system and control put in brackets. Here among other things I considered the 
system described by the differential equation 


dx dz 
e—s + = 38 )ix 
d2 dt” 38); 
. This can be rewritten as the state equations 4; = r2 and ex = —22 + u which represent a model 


in the standard form since the second equation has a real isolated root when € = 0. By letting the 
right hand side of the state equation be zero, every point on the 2; axis is an equilibrium point. 
A model described by the equations « = f(t,z,z,¢), 7 € R” and ez = g(t,2,z,€), z € R” is said 
to be in the standard form if and only if 0 = g(t,a,z,0) has k isolated real roots z = hi(t,x), 
i=1,2,...,k (Khalil, 1996); then these two equations reduces to a quasi-steady state or slow model 
& = f(t,x, h(t, x), 0). 


and D=0 
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For the present system the eigenvalues obtained from the Jacobian matrix A = of bers = 
xr=(21,0 


9 —1| are 0 and —=. Therefore it has an equilibrium subspace and the qualitative behaviour 


of the trajectories depends on the values of ¢, that is when € > 0 all trajectories converge to the 
equilibrium subspace, when ¢ = 0 the system degenerates and is reduced to a first order system, and 
when € < 0 then all trajectories diverge from the equilibrium subspace. In other words the system 
is stable when < > 0 and unstable when « < 0. By plotting the state planes and the time response 
of the state variables of this system when u = 0, one can see that the system is stable if e¢ > 0, 
and unstable if ¢ < 0. When |e| becomes smaller the response of the system becomes more rapid as 
£2 = 4x2 rapidly converges to its root 2 = 0 when € approaches zero. The trajectory is a straight 
line which becomes more parallel to the x2-axis the closer ¢ gets to zero. 


XA 


As € approaches zero and u = 0 the system becomes 
£2 = 0or &; = 0 which has the solution #1(¢) = (0) 
and xo(t) = 0. The singular point ¢ = 0 is the point of 
discontinuity since the solution is stable when ¢ > 0T 
and unstable when e > 0°. 


Figure 9.6 State plane of the system 
ed?z/dt? + dz/dt =u withO<e< 1. 


Next study the effect of a feed back with the sign function, u = K sgn(Cx1 +2), to the system 
in Equation 9.38, where C' and K are real constants. When C = kK = 1, simulation results showed 
that the response of the controlled system changes more rapidly as |e| becomes smaller. In other 
words, the response becomes faster as € approaches zero. This increase in speed of the response as 
e decreases in magnitude applies for the unstable case where ¢ < 0 as well as when « > 0. 
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i 
a 


> 
—_ 0 Xx, The boundary layer or the transient period of the sys- 
tem remains the same either with or without the in- 
eae all put, that is ¢ of approximately [0, 0.05] and [0, 0.4] for 


€ = 0.01 and 0.1 respectively. For ¢ > 1 this bound- 
ary layer extends beyond one second. With the feed 
back input, the state plane trajectory reaches the line 
x2 = 0 during the transient period and then gently 
slides along it. 

Figure 9.7 State plane of ed?2/dt?+dz/dt = sgn(z1+ 
2) when e > 1.. 


The state equations with the input become #1 = x2 and e%2 = —X%24+sgn(#1 +22). When e = 0 
the latter equation above becomes 0 = —x2 + sgn(z1 + £2) which gives the root Z2 = sgn(Z1 + Z2) 
that can not be written in the form Z2 = h(t,Z,). This means that the equation has no isolated 
root and consequently one can not isolate the fast mode from the slow mode by introducing a 
new variable y = x2 — A(t,z1). But for the purpose of finding the boundary layer model, let 
h(t, v1, 22) = sgn(v1 +22). Then y = x — A(t, 21,22) = ro — sgn(a1 + 2) and as a consequence 


v2 = y + sgn(v1 + £2). Introduce a new time variable 7 obtained from eft = — gu or ge —— + when 
T = 0, that is 7 =7+ { tdt = oto This new time variable 7 is generally known as the stretthed 
time variable. Then the equation € [s¢ + 4 sen(a1 + x2)| = —y becomes ou + sen(ai +22) = -y. 
Substituting v2 = y +sgn(zi + v2) gives ou = -y— A sgn(x1 + y+sgn(x1 + 22)), and therefore the 
boundary layer model is ou = -y— sgn(x1 +2241) when 21 +22 > 0, is ou = -y— st sgn(21 +22) 
when 21 + #2 = 0, or is wv =-y- & sgn(x1 + @ —1) when x1 + x2 < 0. When %, + %2 > 0 then 
%2 = +1 and the reduced problem becomes #, = +1. Likewise when Z; + Z2 = 0 then Z2 = 0 and 
t =0, and when Z; + Z2 < 0 then 2 = —1 and z, = —1. 


The discontinuous nature of the signum function makes the analysis of the variable structure 
control system difficult. This is due to the fact that one can not analytically find Seen et) Seen ete) 
where i = 1,2,...,n and x(t) is an n-tuple vector. One way to overcome or go sraundl this probler 
is to use a qarnerical approximation for the sign function where necessary. 

Let the input be u = —(x1 + x2) + sgn(a1 + x2), then simulations show that the system 
has two timescales, which is the characteristic of a singularly perturbed system. Having a fast 
response within the boundary layer and a slow response elsewhere, the boundary layer becomes 
narrower and the response faster as « approaches zero from above (« — Ot). Also, numerical 
studies shows that this boundary layer, in seconds, is approximately [0,0.05], [0, 0.23], and [0, 0.54] 
respectively when ¢ is 0.01, 0.1, and 1. With this input, the equations of the system become 


é, = © and c& = —2 — 2x2 + sen(ai + 2). he lat. equation becomes = 0 — a1 — 24% + 
sgn(z1 + v2) when e = 0, in other words z2 = —421 + $ 7 sen(a1 +22). To find the boundary 
layer, change the variable x2 to a= = ®2 — ea = 2 +: yet — isgn(x; + 22). Therefore x2 = 


yr $01 + 5 $sgn(x1 + Lo) =y- $21 +3 2 Sgn (x1 +y- $01 nai Dena + 2)). Which is essentially 
that x equals y — 5a, + 1 sen(y + $2, + 5) when 21 a Lo $ 0, y— $1 + $sgn(y + $21) when 


Z1 +22 = 0, and y— Les + Usen(y + Le, — 4) when a1 + @2 < 0. Substitute this into the 


equation for e%2 above to get the boundary layer model ¢ [se — $92 + Fsen(ai + 22)| = -2y 
or é [s+ — 24 $01 — ¢sgn(z1 + v2) + dsgn(x1 + w2)| = —2y. Use the stretched time variable 7 


introduced above. Then su = —3y — $21 — Fsgn(z1 + 22), which is the same as saying that ju 
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equals —3y _ real = ; when 271 + 22 > 0, —3y _ real when 2; + 22 = 0, and —3y _ real + + when 
+22 <0. 

Now for a variable structure control, let the hyperplane be described by s = cv, + x2 whose 
derivative is § = ct; +ad2. Let the input be u = —K sgns = —K sgn(cx1 +cx2) for K € Rt. Choose 
a Lyapunov function as V = $s”. The state equations become 4; = #2 and #2 = —+a2—4 (cx, +22). 
The derivative of the Lyapunov function is then V = sé = (cx; + £2) (cag — 4a. — £(cx1 + x2)) = 


C4102 — A224 cx — 2 — “K21 sen(cx1 +22) — *#2(cx, +22). In order to observe the effect of ¢ on 
the stability of the controlled system, let c = 2.7 and K = 3.3. From plots of V against x; and x2 
one may see that whether V be positive or negative depends upon the value € takes. For example, 
there exists « which gives V > 0 when ¢ is 1.7 and 0.08, while if ¢ = 0.3 then V < 0 for all possible 
values of x. 

The original system (Equation 9.38) has the eigenvalues at Ai = 0 and Ap = —12.5, with the 
1 Aste —0.0797 
gf ane = | 0.9968 
since A is a constant matrix and does not depend upon z. Also A is not a stability matrix since 
the condition Red; < 0 is not satisfied. The equilibrium point at the origin is not unique as it 
has already been pointed out earlier that every point on the x1-axis is an equilibrium point. The 
x-axis is a nontrivial null space of the matrix A. The change of variables z = M~'x, where M = 


_ [1 -0.0797 Satan ee 20 exp 18 
[u vw]= F 0.9968 |: leads to Mz = AMz = F Pel and therefore A = lo Eel 


The solution to this system is 41(t) = z1(0) and z2(t) = z2(0)e7!! = z2(O)e*2". That A is no 
stability matrix can be seen by trying to solve the Lyapunov equation PA + A’ P = —Q, where Q 
is a positive definite symmetric matrix. The Lyapunov equation for this system yields no solution. 

From simulation results, when ¢ < 0 the controlled system is unstable, while for ¢ > 0 increasing 
& will widen the range of € in which the controlled system is stable. That is, the larger the value of 
the gain K of the control input, the more robust with respect to ¢ this control scheme. 

Note also that one way to stabilise the origin of the system is to solve the equation A? PE + 
ET PA-(E? PB+S)R71(B? PE+S87)+Q =0, or equivalently F? PE+E? PF—E? PBR-1!B? PE+ 
Q-SR 1ST = 0, where F = A~BR“1S7, Q and R aresymmetric positive definite matrices, and the 
system is written in the form Ez = Ax + Bu. For example, letting Q = R= HE =I and S = 0 leads 


corresponding eigenvectors at v1 = respectively. The system is linear 


to P= ee jase) The feedback input is then u = —Gz, where G = R-1(B?PE+S7*). 

The gain matrix will be G = [1 0.1194]. Then the closed loop eigenvalues can be computed 

from (A — BG)V = EVT, where VV =[u v2], T = a i , 4 is the i** eigenvalue, and v; 
2 


its corresponding eigenvector. In solving the Riccati equation the Frobenius norm of the relative 
residual matrix is 3.14 x 10-'®. Simulations on Simulink show that when ¢ = 0 the system is 
unstable. There exists a domain of attraction outside which the trajectory does not converge. 


247 


§ 9.3 TpXnicalities 
I started to use Latex in 1994 to write a design exercise report for Dr. Martin Zarrop of the 
Control System Centre at UMIST. Back then, most people I know liked the program better than 
its progenitor TfX; even a computer expert like Dr. J. Braham Levy thought TX difficult. I used 
Latex also for writing up my master degree dissertation in 1995, and continued using while in Japan 
and even as late as in early 2001. Since Latex runs on TRX but keeps creating new versions, one 
after another, the various version not being always compatible with one another, I decided to give 
the latter a try and have since completely switched over to it. In a way, Latex is a macro which 
runs on TRX, but it is more like a black box than a macro because one does not have the code for 
it, neither can one sufficiently tailor-make anything.Moreover, it greatly reduces the ability of a user 
to write his own macros by disabling many of such ability inherent in TRX. The first record I have 
of my using TX is the source file of one of my Work Notes, dated 12¢" February 2001 . 

LaTEX(Lamport, 1985) is written by Leslie Lamport. Newer versions of it has come up at a 
regular interval. Unlike most other macros which run on TeX, her source code is free for none but 
herself. Moreover, having used TEX to do what it wants, LaTfX thereby castrates her progenitor 
in such a way that it is impossible for her users to define new macros efficiently by using the \def 
command. With \def disabled, the lion has lost its fangs and users become like lobotomised 
patients, dependent and docile. I have no doubt that with some of the T&X users having such idea 
as mine, sooner or later LaTpX will have to change in these respects. But this is the way I see the 
situation at the moment. 

One of the first macros that I have written is the code to change the date format. The algorithm 
first sets = date, then it assigns the ordinate endings st, nd, rd or th depending on the value of 
ordinate, which is calculated from 


if > 30 then ordinate = 1 else 
if « > 20 then ordinate = x — 20 else 
ordinate = date 
endif 
endif 


In the past when I still used LaTgX I could hardly adjust, but has to accept the existing formats. 
One awkward example is seen in my technical report number 6 where one reference (Fitzgerald et 
al, 1971) appears everywhere as “[FCKK71]”, which looks very awkward. 

The macros which I either wrote myself or adapted from elsewhere, mainly from the manmac 
macroby Knuth, are listed in § 9.3. Apart from these, this thesis uses the plain and the manmac 
macros. Another set of macros which I devellop is that which contains languages. As my definition 
of language is quite wide, this contains many languages among which are those which are used here, 
for example the lanugages for Chemistry, Chinese, Czech, German, French, grammatical jargons, 
Japanese, Lanna, Latin, latin grammar, Mathematics, Pali, Physics, Russian, Sanskrit, and Thai 
(Daiy), etc. But since Graham Davies says that no applications in language may be included in this 
thesis, these macros together with their explanation will be published elsewhere. 

When I first started using TEX instead of LaTfX, I only used the macro plain.tex. Then 
in my first book typeset with TeX (Tiyapan, 2001, knTa2(ii)), I used in addition to the plain TEX 
manmac.tex and epsf.tex. Now to my amazement, I have discovered many other excellent macros, 
for instance rotate.tex, and found that I could understand how they work when I read them. This 
is one of the benefits that comes with talking in TRX instead of, for instance, LaTg@X. I also know 
now the difference between the primitive TEX and plain TeX, and that the latter is only one of the 
infinitely many possible implementations of TRX. However, since all TEX gurus I know use plain 
TEX as a basis, there is no reason why I should be too proud to follow the practice. Having said 
that, my next plan is to improvise on the primitive TEX without any direct reference to the plain 
TEX macro. 

The citation program BibTRX was intended to be used with LaTpX. Karl Berry and Oren 
Patashnik have written btxmac.tex which makes BibTEX usable from plain TEX. But for the present 
purpose I merely use my own macros, which are much simpler, and do not need BibTRX. Ultimately 
such database program as BibTfX would have been extremely useful. But I wish to develop some- 
thing similar to it on my own. 
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§ 10. Conclusion 


To summarise, I have began my study from the Voronoi network, and then went on to study 
continua and then tried to combine them together. I have suggested the idea that a percolation in 
continua can be represented by a percolation in a lattices the type of which depends on the attrition 
mechanism of the particles in that continuum, in other words the way they pack together. 

I have written programs, and have listed a full half of them, and that is quite a lot in any 
programer’s standard. This is because I try to write everything myself, and not to copy even when 
it comes to taking codes from programs that I have written myself in the past. I try to do it this 
way whenever possible, and as a result the various programs should have at least a few things out 
of common with each other. 

Eventhough percolation already models a great many natural phenomena, I think it will prove 
to underly the fundamental structure of a great many more, even of the Big Bang. Therefore I truely 
believe that a better percolation theory may be what is behind the working of the universe. 

A 


§ A. Programs 


§ A.1 Object location 


4% Object2dSqua.m 

clear all; figure(1); clf; a=1; b=2; c=3; 

al=1; a2=1; c1=10; c2=10; bi=-2*a1*5; b2=-2*a2*7; P=eye(6); lambda=.98; 
DithVar=.1; NoiseVar=.1; Limit=10; N=1000; x=2; y=3; 

[Object,m] =ObjSqu(x,y); 

subplot (2,2,1) ,Draw(Object,m,Limit,’Object’,’c’); 

rlabel OX?) ylabel CY?) ; axis equal; axis([-10 10 -10 10]); 
subplot (2,2,2) ,Layout (Object,Limit,m) ; 

Real=RealLin(x,y,N); zeta=[al,a2,b1,b2,c1,c2]’; t=0; s2=0; s3=0; 
10 for Steps=1:N 

11 v =dither(DithVar); p =-bi/a1/2 +v; q =-b2/a2/2 +v; 

12 [Image ,n] =ImgMtx(round(p) ,round(q)); 

13 if Steps==10 


COonNnraoa»hlwnr 


14 Movel(:,1) =Image(:,1); Movel(:,2) =Image(: ,2); 

15 elseif Steps==100 

16 Move2(:,1) =Image(:,1); Move2(:,2) =Image(: ,2); 

17. elseif Steps==200 

18 Move3(:,1) =Image(:,1); Move3(:,2) =Image(: ,2); 

19 elseif Steps==300 

20 Move4(:,1) =Image(:,1); Move4(:,2) =Image(: ,2); 

21. elseif Steps==400 

22 Move5(:,1) =Image(:,1); Move5(:,2) =Image(: ,2); 

23 elseif Steps==500 

24 Move6(:,1) =Image(:,1); Move6(:,2) =Image(: ,2); 

25 elseif Steps==600 

26 Move7(:,1) =Image(:,1); Move7(:,2) =Image(: ,2) ; 

27. «~elseif Steps==700 

28 Move8(:,1) =Image(:,1); Move8(:,2) =Image(: ,2); 

29 elseif Steps==800 

30 Move9(:,1) =Image(:,1); Move9(:,2) =Image(: ,2); 

31 end; 

32 g =Compare (Object ,Image,m,n); e =noise(NoiseVar); y =gte; 
33. «if y>l 

34 x =[p*p,q*q,p.g,1,1]’; t =tt+1; Est(Steps,1) =t; 

35 Est (Steps,2) =-b1/a1/2; e2-Est (Steps,2); 

36 Est (Steps,3) =-b2/a2/2; s3=Est (Steps,3) ; 

37 P =1/lambda*P* (eye (6) -(x*x’ *P) /(lambdatx’ *P*x) ) ; 

38 zeta =zetatP#x*(y-x’*zeta); al =zeta(1,:); a2 =zeta(2,:); 
39 bi =zeta(3,:); b2 =zeta(4,:); 

40 else 

41 t =tt+1; Est(Steps,1) =t; Est(Steps,2) =s2; Est(Steps,3) =s3; 
42 p =RandSrch(Limit); q =RandSrch(Limit); bi =-2*al*p; b2 =-2*a2*q; 
43 end; 

44 end; 


45 Titlei =’X’; Title2 =’Y’; Title3 =’Phase Plane’; Title4 =’Object and Image’; 

46 XLab =’Steps’; YLab =’Mag’; 

47 subplot(2. 2,3) ,compare2([Eat(: ,1) ,Est(:,2)], [Real(:,1) Real (: ,2)] ,Titlet ,XLab ,YLab) 
48 subplot(2,2,4) ,compare2([Est(:,1),Est(:,3)], [Real(:,1) ,Real(: ,3)],Title2,XLab,YLab) 


2 . 
51 subplot(3,3,2) ,Draw(Movel,n,Limit,’N = 10’,’y’); axis equal; axis([-10 10 -10 10]); 
52 subplot(3,3,3) ,Draw(Move2,n,Limit,’N = 100’,’y’); axis equal; axis([-10 10 -10 10]); 
53 subplot(3,3,4) ,Draw(Move3,n,Limit,’N = 200’,’y’); axis equal; axis([-10 10 -10 10]); 
54 subplot(3,3,5) ,Draw(Move4,n,Limit,’N = 300’,’y’); axis equal; axis([-10 10 -10 10]); 
55 subplot(3,3,6) ,Draw(Moved,n,Limit,’N = 400’,’y’); axis equal; axis([-10 10 -10 10]); 
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subplot (3,3,7) ,Draw(Move6,n,Limit,’N = 500’, 
subplot (3,3,8) ,Draw(Move7 ,n,Limit,’N = 600’, 
subplot (3,3,9) ,Draw(Move8,n,Limit,’N = 700’, 


4 Compare.m 
function [y] =Compare (Object , Image ,m,n) 


for j=i:n 


yi) 35 
?y’); 
?y’); 


axis equal; axis([-10 10 -10 10]); 
axis equal; axis([-10 10 -10 10]); 
axis equal; axis([-10 10 -10 10]); 


if (Object (i,1)==Image(j,1))& (Object (i, 2) ==Image(j ,2)) 


y =y +1; 
end; 
end; 
end; 
4 compare2.m 


function [] =compare2(datal,data2,graph_title,x_label,y_label) 
plot (datal(:,1),datai(:,2),’-’ ,data2(:,1) ,data2(:,2),’-’); 
grid on; title(graph_title); xlabel(x_label); ylabel(y_label1) ; 


¥, dither.m 
function [dither]=dither(dith_variance) 


dith_limit=sqrt (3*dith_variance); dither=dith_limit*2*(.5-rand(1)); 


%, Draw.m 


function []=Draw(Pict ,Dim,Limit , Title, Colour) 


for i=1:Dim 


fi11([ (Pict (i,1)-.5), (Pict (i,1)+.5), (Pict (i,1)+.5), (Pict(i,1)-.5)],... 
[(Pict(i,2)-.5), (Pict (i,2)-.5) , (Pict (i,2)+.5), (Pict (i,2)+.5)],Colour) ,hold on; 


end; 

axis([-Limit Limit -Limit Limit]); grid; title(Title) ; 
4 ImgMtx.m 

function [yy,n]=ImgMtx(p,q) 

i=1; 


for x=(p-1): (ptt) 

for y=(q-1) : (qt1) 

yy(i,l)=x; yy(i,2)=y;isit+l; 

end; 
end; 
n =size(yy,1); 

4 Layout .m 
function []=Layout (Object ,Limit ,m) 
for i=-Limit:Limit 

x =itLimitt+1; 

for j=-Limit:Limit 


y =j+Limitt1; [Image,n] =ObjMtx(i,j); xx(x,1) =i; yy(Gy.1) =j; 


z(x,y) =Compare (Object ,Image,m,n) ; 
end; 
end; 


mesh(xx,yy,z); title(’Object Profile’); xlabel(’x’); ylabel(’y’); 


zlabel(’Pixels overlapped’); grid; 
% noise.m 

function [e]=noise(noise_sig) 
e=sqrt (noise_sig)*randn(1) ; 

4% ObjSqu.m 

function [yy,n]=0bjSqu(p,q) 

i=1; 

for x=(p-1): (ptt) 

for y=(q-1) : (qt1) 

yy(i,1) =x; yy(i,2) =y; i =itt; 
end; 

end; 
n =size(yy,1); 

4 RealLin.m 

function [Real] =RealLin(x,y,N) 
for i=1:N 

Real(i,1) =i; Real(i,2) =x; Real(i,3) =y; 
end; 

% RandSrch.m 

function [y]=RandSrch(limit) 

y =limit*2*(.5-rand(1)); 
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§ A.2 Network percolation, two dimensions 


Conon» hlwnere 


4% perco 
clear all; St=sum(100*clock); rand(’state’,St); CNa=200; Dim=2; X=rand(CNa,Dim) ; 
[Va,Ca]=voronoin(X); T=delaunayn(X); TN=size(T,1); VNa=size(Va,1); LB=0.05; 
UB=0.95; IXa=zeros(VNa,1); V=[]; Count=0; VCNa=[]; 
for i=1:CNa, 
VCNa=[VCNa; size (Ca{i},2)]; 
end 
for i=1:VNa, 
if ((Va(i,1)>LB & Va(i,1)<UB) & (Va(i,2)>LB & Va(i,2) <UB)) 
V=[V;Va(i,:)]; Count=Count+1; IXa(i,1)=Count; 
end 
end 
VN=size(V,1); VCN=[]; Count=0; Xa=X; X=[]; 
Tmp=sparse(1,CNa) ; 
for i=1:CNa, 
Include=1; 
for j=1:VCNa(i,1), 
if (IXa(Ca{i}(1,j) ,1)==0) 
Include=0; 
end 
end 
if (Include==1) 
Count=Countt+1; C{Count ,1}=[]; VCN=[VCN;VCNa(i,1)]; 
for j=1:VCNa(i,1), 
C{Count ,1} (1, j)=IXa(Ca{i}(1,j),1); 
end 
X=([X;Xa(i,:)]; Tmp(1,i)=Count; 
end 
end 
CN=size(C,1); T2=[—]; T3=0; 
for i=1:TN, 
TmpA=[]; 
for j=1:3, 
if (tmp (TG, §))) 
TmpA=[TmpA, Tmp(T(i, j)) 1; 
end 
end 
TmpB=size (TmpA, 2) ; 
if (TmpB==2) 
T2=[T2;TmpA] ; 
elseif (TmpB==3) 
T3=[T3;TmpA] ; 
end 
end 
¥, for cells 
B=[]; BXX=sparse(CN,CN); NeCMat=sparse(CN,CN); Count=0; 
for i=1:size(T2,1), 
Count=Count+1; B=[B; [T2(i,1),T2(i,2)]]; BXX(T2(i,1) ,T2(i,2))=Count; 
BXX(T2(i,2) ,T2(i,1))=Count; NeCMat(T2(i,1),T2(i,2))=1; NeCMat(T2(i,2) ,T2(i,1))=1; 
end 
for i=1:size(T3,1), 
for j=1:Dim, 
for k=(j+1):(Dimt1), 
if (BXX(T3(i, j) ,T3(i,k) )==0) 
Count=Count+1; B=(B; [T3(i,j) ,T3(i,k)]]; BXX(T3(i,j) ,T3(i,k))=Count; 
BXX(T3(i,k) ,T3(i,j))=Count; NeCMat (13(4,j),13G4 1) 213 
NeCMat (T3 (i,k) ,T3(i, j) )=1; 
end 
end 
end 
end 
BN=Count; A=X; N=size(A,1); LMat=sparse(1,N); UMat=sparse(1,N); LBc=0.2; UBc=1-LBc; 
for i=1:N, 
if (A(i,1)<=LBc) 
LMat (1,i)=1; 
elseif (A(i,1)>=UBc) 
UMat (1,i)=1; 
end 
end 
NeMat=NeCMat; Blocked=randperm(CN) ; 
%, for bonds 
NeBMat=sparse (BN ,BN) ; 
for i=1:CN, 
[a,b,c]=find(BXX(i,:)); nc=size(c,2); 
for j=1:(nc-1), 
for k=(j+i1):nc, 
NeBMat (c(1,j),c(1,k))=1; NeBMat(c(1,k) ,c(1,j))=1; 
end 
end 
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80 end 

81 A=B; N=size(A,1); LMat=sparse(1,N); UMat=sparse(1,N); 
82 for i=1:N, 

83 if ((X(A(i,1),1)<=LBc) | (X(A(i,2) ,1)<=LBc)) 


84 LMat (1,i)=1; 

85 elseif ((X(A(i,1),1)>=UBc) | (X(ACi,2) ,1)>=UBc)) 
86 UMat (1,i)=1; 

87 end 

88 end 


89 NeMat=NeBMat; Blocked=randperm(BWN) ; 
90 %for vertices 

91 Tmp=sparse(1,VN) ; 

92 for i=1:CN, 

93 for j=1:VCN(i,1), 

94 Tmp(1,C{i} (1, j))=1; 
95 end 

96 end 

97 Vv=(1; 

98 Count=0; 

99 for i=1:VN, 

100 if (Tmp(1,i)) 


101 Count=Count+1; Vv=[Vv;V(i,:)]; Tmp(1,i)=Count; 
102 end 
103 end 


104 VvN=size(Vv,1); 
105 for i=1:CN, 
106 for j=1:VCN(i,1), 


107 Cv{i}(1,j)=Tmp(1,C{i}(1,j)); 
108 end 
109 end 


110 E=[]; EVV=sparse(VN,VN); EVVv=sparse(VvN,VvN); NeVMat=sparse(VvN,VvN) ; 
111 Countv=0; Count=0; 

112 for i=1:CN, 

113 Tmp=[Cv{i}(1,1:VCN(i,1)) ,Cv{i}(1,1)]; 

114 for j=1:VCN(i,1), 


115 Vi=Tmp(1,j); V2=Tmp(1,(j+1)); 

116 if (NeVMat (V1, V2) ==0) 

117 Countv=Countvti; NeVMat(V1,V2)=1; NeVMat(V2,V1)=1; 
118 end 

119 end 


120.» Tmp=(C{i} (1,1: VCN(i,1)) ,C{i}(1,1)]; 
121 for j=1:VCN(i,1), 


122 Vi=Tmp(1,j); V2=Tmp(1, (j+1)); 

123 if (EVV (V1,V2)==0) 

124 Count=Count+1; E=[E;[V1,V2]]; EVV(V1,V2)=Count; EVV(V2,V1)=Count; 
125 end 

126 end 

127 end 


128 EN=Count; A=Vv; N=size(A,1); LMat=sparse(1,N); UMat=sparse(1,N); 
129 LBv=2+*LB; UBv=(UB-LB) ; 

130 for i=1:N, 

131 if (A(i,1)<=LBv) 


132 LMat (1,i)=1; 

133 elseif (A(i,1)>=UBv) 
134 UMat (1,i)=1; 

135 end 

136 end 


137 NeMat=NeVMat; Blocked=randperm(VvN) ; 

138 {for edges 

139 NeEMat=sparse(EN,EN); MEV=sparse(EN,VN); [a,b,c]=find(EVV); nc=size(c,1); 
140 for i=i:nc, 

141 MEV(c(i) ,a(i))=1; MEV(c(i) ,b(i))=1; 

142 end 

143 for i=1:VN, 

144 a=find(MEV(: ,i)); 

145 if (~isempty (a) ) 


146 TmpN=size(a,1); Tmp=[a;a(1,1)]’; 

147 for j=1:TmpN, 

148 for k=(j+1):TmpN, 

149 NeEMat (Tmp(1,j),Tmp(1,k))=1; NeEMat (Tmp(1,k) ,Tmp(1,j))=1; 
150 end 

151 end 

152 end 

153 end 


154 A=E; N=size(A,1); LMat=sparse(1,N); UMat=sparse(1,N); 
155 for i=1:N, 
156 if ((V(A(i,1) ,1)<=LBv) | (V(ACi,2) ,1)<=LBv)) 


157 LMat (1,i)=1; 

158 elseif ((V(A(i,1),1)>=UBv) | (V(ACi,2) ,1)>=UBv)) 
159 UMat (1,i)=1; 

160 end 


161 end 
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162 NeMat=NeEMat; Blocked=randperm(EN) ; 

163 % percol 

164 clear ClusA ClusB TSeries; NClusA=0; Perco=0; 
165 for i=1:N, 

Joined=0; 


166 
167 
168 
169 
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171 
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174 
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188 
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206 
207 
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209 
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213 
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216 
217 
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219 
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224 
225 
226 
227 
228 
229 
230 
231 
232 
233 
234 
235 
236 
237 
238 
239 


for 


j=i:NClusA, 


if (ClusA{j ,3} (1,Blocked(1,i))~=0) 


ClusA{j ,1}=ClusA{j,1}+1; ClusA{j,2}(1,Blocked(1,i))=1; 
ClusA{j ,3}=ClusA{j,3} | NeMat(Blocked(1,i),:); Joined=1; 


end 
if (Joined==1) 


for k=1:4, 
ClusB{1,k}=ClusA{j,k}; 
end 
NClusB=1; 
if (j==1) 
Tmp=ClusA; clear ClusA; 
for k=1:(NClusA-1) , 
for 1=1:4, 
ClusA{k,1}=Tmp{(k+1) ,1}; 
end 
end 
elseif (j==NClusA) 
Tmp=ClusA; clear ClusA; 
for k=1:(NClusA-1) , 
for 1=1:4, 
ClusA{k,1}=Tmp{k,1}; 
end 
end 
else 
Tmp=ClusA; clear ClusA; 
for k=1:(j-1), 
for 1=1:4, 
ClusA{k,1}=Tmp{k,1}; 
end 
end 
for k=j: (NClusA-1), 
for 1=1:4, 
ClusA{k,1}=Tmp{(k+1) ,1}; 
end 
end 
end 
for k=1:(NClusA-1), 
if (sum(ClusA{k,2} & ClusB{1,3}) ~= 0) 
ClusB{1,1}=ClusB{1,1}+ClusA{k,1}; ClusB{1,2}=ClusB{1,2} | ClusA{k,2}; 
ClusB{1,3}=ClusB{1,3} | ClusA{k,3}; ClusB{1,4}=ClusB{1,4} | ClusA{k,4}; 
else 
NClusB=NClusB+t1; 
for 1=1:4, 
ClusB{NClusB ,1}=ClusA{k,1}; 
end 
end 
end 
if ((sum(full(LMat & ClusB{1,2}))~=0) & (sum(full(UMat & ClusB{1,2}))~=0)) 
ClusB{1,4}=1; Perco=1; 
end 
NClusA=NClusB; ClusA=ClusB; clear ClusB; break; 


end 


end 


if (Joined==0) 
NClusA=NClusAt+1; ClusA{NClusA, 1}=1; 
ClusA{NClusA, 2}=sparse(1,Blocked(1,i) ,1,1,N); 
ClusA{NClusA,3}=NeMat (Blocked(1,i),:); ClusA{NClusA,4}=0; 


end 


TSeries{i,1}=ClusA; TSeries{i,2}=Perco; 


end 


i, Reverse 
Tmp=Blocked; Blocked=[]; 


for i= 


1:N, 


Blocked= [Blocked ,Tmp(1, (N-it+1))]; 


end 


%, simulations 


Nc=0; 


for i= 


TSnap=[] ; 
1:N, 


if (TSeries{i,2}) 
Nc=i; break; 


end 
end 


240 Pc=Nc/N; Cord=mean(sum(NeMat ,2)); 
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§ A.3 Network percolation, three dimensions 


4 perco3d.m 
clear all; St=sum(100*clock); rand(’state’,St); CNa=300; Dim=3; 
X=rand(CNa,Dim); [Va,Ca]=voronoin(X); T=delaunayn(X); TN=size(T,1); 
VNa=size(Va,1); LB=0.05; UB=0.95; IXa=zeros(VNa,1); VCNa=[]; 
for i=1:CNa, 
VCNa=[VCNa; size (Ca{i},2)]; 
end 
MVCa=[]; 
for i=1:CNa, 
10 Tmp=ones(1,VCNa(i,1)); MVCa=[MVCa;sparse(Tmp,Ca{i},Tmp,1,VNa)]; 
11 end 
12 Vin=zeros(1,VNa); Count=0; 
13 for i=1:VNa, 
14 if ((max(Va(i,:))<1) & (min(Va(i,:))>0)) 


CoOonNnoaa1hlwnre 


15 Count=Countt1; Vin(1,i)=1; IXa(i,1)=Count; 
16 end 
17 end 


18 Tmp="Vin; Cin=ones(1,CNa) ; 
19 for i=1:CNa, 
20 if(sum(Tmp & MVCa(i,:))) 


21 Cin(1,i)=0; 
22 end 
23 end 


24 C=[]; count=0; VCN=[]; 
25 for i=1:CNa, 
26 if (Cin(i)) 


27 count=count+1; TmpN=size(Ca{i},2) ; 
28 for j=1:TmpN, 

29 C{count ,1}(1,j)=IXa(Caf{i}(1,j)); 
30 end 

31 VCN(count ,1)=TmpN; 

32 end 

33 end 


34 CN=size(C,1); MidBCx=sparse(CNa,CNa); MidBCy=sparse (CNa,CNa) ; 
35 MidBCz=sparse(CNa,CNa); BLng=sparse(CNa,CNa) ; 

36 for i=1:TN, 

37. Tmp=([T(i,:) ,TCi,1)]; 

38 for j=1:(Dimt1), 


39 for k=(j+1):(Dimt1), 

40 if ((Cin(1,Tmp(1,j)) | Cin(1,Tmp(1,k))) & “BLng(j,k)) 

41 MidBCx(Tmp(1,j),Tmp(1,k) )=(X(k, 1) +X(j,1))/2; 

42 MidBCx(Tmp(1,k) , Tmp(1,j))=(X(k,1)+X(j,1))/2; 

43 MidBCy(Tmp(1,j) , Tmp(1,k) )=(X(k, 2)+X(j,2))/2; 

44 MidBCy (Tmp(1,k) ,Tmp (1, j) )=(X(k, 2) +X(j,2))/2; 

45 MidBCz(Tmp(1, j) , Tmp(1,k) )=(X(k,3)+X(j,3))/2; 

46 MidBCz(Tmp(1,k) ,Tmp(1,j))=(X(k,3)+X(j,3))/2; 

47 dx=X(k,1)-X(j,1); dy=X(k,2)-X(j,2); dz=X(k,3)-X(j,3); 
48 TmpA=sqrt (dx*dx + dy#dy + dz*dz); 

49 BLng (Tup (1,4) .Tmp (1k) )=TmpA; BLng (Tmp(1,k) , Tmp(1,j))=TmpA; 
50 end 

51 end 

52 end 

53 end 


54 Fa=[]; Count=0; FaC=[]; 
55 for i=1:CNa, 
56 if (Cin(1,i)) 


57 FaC{i,1}=0; FaC{i,2}=0; 
58 end 
59 end 


60 for i=1:(CNa-1), 
61 for j=(i+1):CNa, 


62 TmpA=0; TmpB=0; 

63 if (Cin(1,i)) 

64 TmpA=1; 

65 end 

66 if (Cin(1,j)) 

67 TmpB=1 ; 

68 end 

69 if(TmpA | TmpB) 

70 Tmp=MVCa(i,:) & MVCa(j,:); 

71 if (sum(Tmp) ) 

72 [a,b]=find(Tmp); Count=Count+1; Fa{Count,1}=size(b,2); Fa{Count ,2}=b; 
73 Fa{Count ,3}=[MidBCx (i,j) ,MidBCy (i,j) ,MidBCz(i,j)J]; 
74 if (TmpA) 

75 FaC{i,1}=FaC{i,1} + 1; FaC{i,2}=[FaC{i,2},Count]; 
76 FaC{i,3}{1,1}=i; FaC{i,3}{1,2}5j; 

77 end 

78 if (TmpB) 


79 FaC{j,1}=FaC{j,1} + 1; FaC{j,2}=[FaC{j,2},Count]; 


82 en 
83 end 

84 end 

85 end 

86 FaN=size 
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FaC{j,3}{1,1}=i; FaC{j,3}{1,2}5j; 


87 for i=1:VNa, 


88 if (Vin 
89 v=([V 
90 end 

91 end 


end 

d 

(Fa,1); V=(]; 
(1,1)) 
;[Va(i,:),i]]; 


92 VN=size(V,1); Tmp=sparse(VNa,1); 
93 for i=1:VN, 


94 Tmp(V¢ 
95 end 

96 F=Fa; 

97 for i=1: 
98 for j= 
99 F{i, 
100 end 
101 end 

102 FN=FaN; 
103 count=0; 


104 for i=1: 
105 if (Cin 
106 coun 
107 FC{c 
108 end 


109 end 


1,4) ,1)=i; 


Fal, 
1:F{i,1}, 
2}(1,j)=Tmp(Fa{i,2}(1,j).1); 


FC=[]; 


CNa, 

(i)) 

t=countt+1; FC{count,1}=FaC{i,1}; 

ount ,2}=FaC{i,2}; FC{count ,3}=FaC{i, 3}; 


110 NghV=sparse(VN,VN); Tmp=F; TmpN=FN; 


Appendix A: Programs 


111 for i=1:TmpN, 

112 TmpA=Tmp{i,2}; x=[]; y=(]; z=[]; TmpB=Tmp{i,1}; 

113 if (TmpB==3) 

114 for j=1:2, 

115 for k=(j+1):3, 

116 NghV(TmpA(1,j) ,TmpA(1,k))=1; NghV(TmpA(1,k) ,TmpA(1,j))=1; 
117 end 

118 end 

119 else 

120 for j=1:TmpB, 

121 ae ahaa y=Ly;V(TmpA(1,j),2)]; z=[z;VCTmpaA(1,j) ,3)]; 
122 en 

123 a=y (1) *(z(2)-z(3) ) ty (2) *(z (3) -z (1) ) ty (3) * (z(1) -2 (2) ) ; 
124 b=z (1) *(x(2)-x(3) ) +z (2) *(x (3) -x (1) ) +2 (3) * (x (1) -x (2) ) ; 
125 c=x (1) * Cy (2) -y (3) ) +x (2) #(y (3) -y (1) ) +x (3) * (y (1) -y (2) 
126 K=1/sqrt(a*a + b*b + c¥c); Th{i}=K*a; Th{2}=K*b; Th{3}=K*c; Max=0; 
127 for j=1:3, 

128 if (Th{j}<Max) 

129 Max=Th{j}; jMax=j; 

130 end 

131 end 

132 if (jMax==1) 

133 py; q=z; 

134 elseif (jMax==2) 

135 pHx; q=zZ; 

136 else 

137 Pp=X; gq=y; 

138 end 

139 t=delaunay (p,q); 

140 for j=i:size(t,1), 

141 for k=1:3, 

142 t(j.k)=TmpA(1,t(j.k)); 

143 end 

144 end 

145 Nt=size(t,1); TmpC=sparse(VN,VN) ; 

146 for j=1:Nt, 

147 TmpT=[t(j,:),t¢(j,1)]; 

148 for k=1:3, 

149 TmpD=sort ([TmpT(1,k) ,TmpT(1, (k+1))]); 

150 TmpC(TmpD (1,1) ,TmpD (1,2 )=TmpC (TmpD (1,1) , TmpD(1,2)) +1; 
151 end 

152 end 

153 [k,1,m]=find(TmpC) ; 

154 for j=1:size(k,1), 

155 if (m(j) ==1) 

156 NghV(k(j),1(j))=1; NghV(1(j) .k(j) )=1; 

157 end 

158 end 

159 end 

160 end 


161 Fed=[]; 
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162 for i=1:FN, 
163 for j=1:2, 


164 Fed{i, j}=F{i, j}; 
165 end 
166 end 


167 for i=1:FN, 
168 Count=0; TmpN=Fed{i,1}; 
169 if (TmpN>3) 


170 Tmp=Fed{i,2}; TmpA=Tmp(1,1); Tmp=Tmp(1,2:TmpN); TmpN=TmpN-1; Count=Count+1; 
171 while (TmpN) 

172 a=TmpA(1,Count); TmpB=[]; Found=0; 
173 for j=1:TmpN, 

174 TmpC=Tmp(1,j); 

175 if (NghV(a,TmpC) & ~Found) 

176 TmpA=[TmpA,TmpC]; Found=1; 

177 else 

178 TmpB=([TmpB , TmpC] ; 

179 end 

180 end 

181 Tmp=TmpB; TmpN=TmpN-1; Count=Count+1; 
182 end 

183 Fed{i,2}=TmpA; 

184 end 

185 end 


186 LB2=2*LB; UB2=(UB-LB) ; 

187 % cells II 

188 Tmp=ones(1,CNa) ; 

189 for i=1:CNa, 

190 if ((max(X(i,:))>UB) | (min(X(i,:))<LB)) 


191 Tmp(1,i)=0; 
192 end 
193 end 


194 a=find(Imp); TmpB=sparse(1,CNa); x=(]; 

195 for i=1:size(a,2), 

196 TmpB(1,a(1,i))=i; x(i,:)=X(a(i),:); 

197 end 

198 xn=size(x,1); TmpA=zeros(size(T)); TmpN=size(T,1); 
199 for i=1:TmpN, 

200 «= for j=1:4, 


201 af ((Tmp (1, T(4,5)))) 

202 TmpA(i,j)=TmpB(1,T(i,j)); 
203 end 

204 end 

205 end 


206 nghc=sparse (xn, xn) ; 

207 for i=1:TmpN, 

208 [a,b,c]=find(TmpA(i,:)); TmpB=size(c,2); 
209 if (TmpB>1) 


210 for j=1: (TmpB-1), 

211 for k=(j+1):TmpB, 

212 nghe(c(1,j),c(1,k))=1; nghe(c(1,k) ,c(1,j))=1; 
213 end 

214 end 

215 end 

216 end 


217 A=x; N=size(A,1); LMat=sparse(1,N); UMat=sparse(1,N) ; 
218 for i=1:N, 
219 if (A(i,1)<=LB2) 


220 LMat (1,i)=1; 

221 elseif (A(i,1)>=UB2) 
222 UMat (1,i)=1; 

223 end 

224 end 


225 NeMat=nghc; Blocked=randperm(xn) ; 

226 % bonds II 

227 [a,b,c]=find(triu(nghc)); b=[a,b]; bn=size(b,1); Tmp=sparse(bn,xn) ; 
228 for i=1:bn, 

229 Tmp(i,b(i,1))=1; Tmp(i,b(i,2))=1; 

230 end 

231 nghb=sparse (bn, bn) ; 

232 for i=1:xn, 

233 a=find(Tmp(: ,i)); 

234 if (~isempty (a) ) 


235 TmpN=size(a,1); 

236 for j=1: (TmpN-1), 

237 for k=(j+1):TmpN, 

238 nghb(a(j,1),a(k,1))=1; nghb(a(k,1),a(j,1))=1; 
239 end 

240 end 

241 end 

242 end 


243 A=b; N=size(A,1); LMat=sparse(1,N); UMat=sparse(1,N) ; 
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244 for i=1:N, 
245 if ((x(A(i,1),1)<=LB2) | (x(A(i,2),1)<=LB2)) 


246 LMat (1,i)=1; 

247 elseif ((x(A(i,1),1)>=UB2) | (x(ACi,2) ,1)>=UB2)) 
248 UMat (1,i)=1; 

249 end 

250 end 


251 NeMat=nghb; Blocked=randperm(N) ; 

252 % vertices II 

253 [a,b,c]=find((NghV)); Tmp=sparse(1,VN); 

254 for i=1:size(a,1), 

255 Tmp(1,b(i,1))=1; 

256 end 

257 d=find(Tmp); TmpN=size(d,2) ; 

258 for i=1:TmpN, 

259 Tmp(1,d(1,i))=i; 

260 end 

261 for i=1:size(a,1), 

262 a(i,1)=Tmp(1,a(i,1)); b(i,1)=Tmp(1,b(i,1)); 
263 end 

264 nghv=sparse(a,b,c,TmpN,TmpN); TmpA=(]; 

265 for i=1:TmpN, 

266 TmpA(Tmp(1,d(i)) ,:)=V(i,1:3); 

267 end 

268 A=TmpA; N=size(A,1); LMat=sparse(1,N); UMat=sparse(1,N); 
269 for i=1:N, 

270 if (A(i,1)<=LB2) 


271 LMat (1,i)=1; 

272 elseif (A(i,1)>=UB2) 
273 UMat (1,i)=1; 

274 end 

275 end 


276 NeMat=nghv; Blocked=randperm(N) ; 

277 % edges II 

278 [a,b,c]=find(triu(NghV)); E=[a,b]; EN=size(E,1); Tmp=sparse(EN,VN) ; 
279 for i=1:EN, 

280 Tmp(i,E(i,1))=1; Tmp(i,E(i,2))=1; 

281 end 

282 NghE=sparse (EN,EN) ; 

283 for i=1:VN, 

284 a=find(Tmp(: ,i)); 

285 if (~isempty (a) ) 


286 TmpN=size(a,1); 

287 for j=1:(TmpN-1), 

288 for k=(j+1):TmpN, 

289 NghE(a(j,1),a(k,1))=1; NghE(a(k,1),a(j,1))=1; 
290 end 

291 end 

292 end 

293 end 


204 A=E; N=size(A,1); LMat=sparse(1,N); UMat=sparse(1,N) ; 
295 for i=1:N, 
296 «if ((V(ACi, 1) ,1)<=LB2) | (V(ACi,2) ,1)<=LB2)) 


297 LMat (1,i)=1; 

298 elseif ((V(A(i,1) ,1)>=UB2) | (V(ACi,2) ,1)>=UB2)) 
299 UMat (1,1) =1; 

300 end 

301 end 


302 NeMat=NghE; Blocked=randperm(N) ; 

303 % percolation 

304 clear ClusA ClusB TSeries; NClusA=0; Perco=0; 
305 for i=1:N, 

306 Joined=0; 

307. for j=1:NClusA, 


308 if (ClusA{j ,3}(1,Blocked(1,i))~=0) 

309 ClusA{j ,1}=ClusA{j,1}+1; ClusA{j,2}(1,Blocked(1,i))=1; 
310 ClusA{j ,3}=ClusA{j,3} | NeMat(Blocked(1,i),:); Joined=1; 
311 end 

312 if (Joined==1) 

313 for k=1:4, 

314 ClusB{1,k}=ClusA{j,k}; 

315 end 

316 NClusB=1; 

317 if (j==1) 

318 Tmp=ClusA; clear ClusA; 

319 for k=1: (NClusA-1) , 

320 for 1=1:4, 

321 ClusA{k,1}=Tmp{(k+1) ,1}; 

322 end 

323 end 

324 elseif (j==NClusA) 


325 Tmp=ClusA; clear ClusA; 
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326 
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for k=1: (NClusA-1) , 
for 1=1:4, 
ClusA{k,1}=Tmp{k,1}; 
end 
end 
else 
Tmp=ClusA; clear ClusA; 
for k=1:(j-1), 
for 1=1:4, 
ClusA{k,1}=Tmp{k,1}; 
end 
end 
for k=j:(NClusA-1), 
for 1=1:4, 
ClusA{k,1}=Tmp{(k+1) ,1}; 
end 
end 
end 
for k=1: (NClusA-1), 
if (sum(ClusA{k,2} & ClusB{1,3}) ~= 0) 
ClusB{1,1}=ClusB{1,1}+ClusA{k,1}; ClusB{1,2}=ClusB{1,2} | ClusA{k,2}; 
ClusB{1,3}=ClusB{1,3} | ClusA{k,3}; ClusB{1,4}=ClusB{1,4} | ClusA{k,4}; 
else 
NClusB=NClusB+t1; 
for 1=1:4, 
ClusB{NClusB,1}=ClusA{k,1}; 
end 
end 
end 
if ((sum(full(LMat & ClusB{1,2}))~=0) & (sum(full(UMat & ClusB{1,2}))~=0)) 
ClusB{1,4}=1; Perco=1; 
end 
NClusA=NClusB; ClusA=ClusB; clear ClusB; break; 
end 
end 
if (Joined==0) 
NClusA=NClusAt+1; ClusA{NClusA, 1}=1; 
ClusA{NClusA, 2}=sparse(1,Blocked(1,i) ,1,1,N); 
ClusA{NClusA,3}=NeMat (Blocked(1,i),:); ClusA{NClusA,4}=0; 
end 
TSeries{i,1}=ClusA; TSeries{i,2}=Perco; 
end 
%, Reverse 
Tmp=Blocked; Blocked=[]; 
for i=1:N, 
Blocked=[Blocked ,Tmp(1, (N-it+1))]; 
end 
%, simulations 
Nc=0; 
for i=1:N, 
if (TSeries{i,2}) 
Nc=i; break; 
end 
end 
Pc=Nc/N; Cord=mean(sum(NeMat ,2)); 
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§ A.4 Network percolation, 2—d section 
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%, section 
MVC=[]; 
for i=1:CN, 
Tmp=ones(1,VCN(i,1)); MVC=[MVC;sparse(Tmp,C{i},Tmp,1,VN)]; 
end 
CE=[]; 
for i=1:EN, 
Tmp=MVC(: ,E(i,1)) & MVC(:,E(i,2)); 
if (sum(Tmp) ) 
TmpA=find(Tmp)’; TmpN=size(TmpA,2); CE{i,1}=TmpN; CE{i,2}=TmpA; 
end 
end 
ie=[]; je=0; ke=(1; 
for i=1:EN, 
ie(i,1)=V(E(i,2) ,1)-V(E(i,1) ,1); je(i,1)=V(E(i,2) ,2)-V(E(i,1) ,2); 
ke (i,1)=V(E(i,2) ,3)-V(E(i,1) ,3); 
end 
a=1; b=.01; cc=0; d=-.5; v=[—]; vC=[]; count=0; 
for i=1:EN, 
Tmp= (a*ie (i) +b*je(i)+cc¥ke(i)) ; 
if (Tmp) 
vi=E(i,1); xl=V(v1,1); yl=V(v1,2); z1=V(v1,3); TmpA=(a*x1+b*y1l+cc¥z1+d) ; 
v2=E(i,2); x2=V(v2,1); y2=V(v2,2); z2=V(v2,3); t=-TmpA/Tmp; 
if((t>=0) & (t<=1)) 
x=x1+(x2-x1)#t; y=yit+(y2-y1)*t; z=z1+(z2-z1)*t; count=count+1; 
v(count,:)=[x,y,z]; vC{count ,1}=CE{i,1}; vC{count ,2}=CE{i,2}; 
end 
else 
if(“TmpA) % both nom and denom = 0 
count=countt1; v(count,:)=[x1,y1,z1]; vC{count ,1}=CE{i,1}; 
vC{count ,2}=CE{i,2}; count=count+1; v(count,:)=[x2,y2,z2]; 
vC{count ,1}=CE{i,1}; vC{count ,2}=CE{i, 2}; 
end 
end 
end 
vn=count; cC=sparse(CN,1); count=0; 


for i=1:vn, 
for j=1:vC{i,1}, 
if (~cC(vC{i,2}(j))) 
count=count+1; cC(vC{i,2}(j) ,1)=count; 
end 
end 
end 
cn=count; vc=vC; 
for i=1:vn, 
for j=i:vcf{i,1}, 
ve{i,2} (1, j)=cC(vC{i ,2}(j)) ; 
end 
end 
c=[]; 
for i=1:cn, 
c{i,1}=0; cf{i,2}=0; 
end 
for i=1:vn, 
for j=1i:vc{i,1}, 
c{vc{i,2}(j) ,1}=c{vc{i,2}(j),1}41; c{vef{i,2}(j) ,2}=[cf{ve{i,2}(j) 23,1]; 
end 
end 
for i=1:cn, 
Tmp=(]; 
for j=i:cf{i,1}, 
haps timpry kets .2)C) 21), ¢fi,23(j)]1; 
en 
TmpA=min(Tmp,[],1); TmpB=max(Tmp,[],1); [TmpC,TmpD]=min(TmpB-TmpA) ; 
if (TmpD==1) 
TmpA=Tmp(:,2); TmpB=Tmp(: ,3) ; 
elseif (TmpD==2) 
TmpA=Tmp(:,1); TmpB=Tmp(: ,3) ; 
else 
TmpA=Tmp(:,1); TmpB=Tmp(: ,2) ; 
end 
TmpC=delaunay(TmpA,TmpB) ; TmpN=size(TmpC,1) ; 
for j=1:TmpN, 
for k=1:3, 
TmpC (j,k) =Tmp(TmpC (j,k) ,4); 
end 
end 
TmpA=sparse (vn, vn) ; 
for j=1:TmpN, 
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80 for k=1:2, 

81 for m=(kt1):3, 

82 TmpA (TmpC (j,k) , TmpC (j ,m) )=TmpA(TmpC (j,k) , TmpC(j ,m) ) +1; 
83 TmpA (TmpC (j ,m) , TmpC (j,k) )=TmpA(TmpC (j ,m) , TmpC (j,k) ) +1; 
84 end 

85 end 

86 end 


87 [x,y,z]=find(TmpA) ; TmpB=[]; TmpC=[]; 
88 for j=1:size(x,1), 


89 if (2(j)==1) 

90 TmpB=([TmpB;x(j),y(j)]; TmpC(y(j) ,1)=1; 
91 end 

92 end 

93 TmpA=[]; 

94 for j=1:size(TmpC,1), 

95 TmpA{j,1}=(1; 

96 end 

97 for j=1:size(TmpB,1), 

98 TmpA{TmpB(j,1),1}=[TmpA{TmpB(j,1) ,1},TmpB(j,2)]; 
99 end 


100 Tmp=Tmp(1,4); TmpB=Tmp; 
101 TmpC=sparse(Tmp,1,1,vn,1); count=c{i,1}-1; 
102 while (count>0) , 


103 if (~ (TmpC (TmpA{Tmp} (1) ,1))) 

104 Tmp=TmpA{Tmp}(1); TmpB=[TmpB,Tmp]; TmpC(Tmp,1)=1; 
105 else 

106 Tmp=TmpA{Tmp}(2) ; TmpB=[TmpB,Tmp]; TmpC(Tmp,1)=1; 
107 end 

108 count=count-1; 

109 end 

110 c{i,3}=TmpB; 

111 end 


112 for i=1:cn, 
113. Tmp=[0,0,0]; 
114 for j=i:cf{i,1}, 


115 Tmp=Tmptv(c{i,2}(j).:)3 
116 end 

117 Tmp=Tmp/c{i,1}; c{i,4}=Tmp; 
118 end 


119 Tmp=sqrt (a*atb*btcc*cc); u=[a/Tmp,b/Tmp,cc/Tmp]; uzp=u; ux=[1,0,0]; 
120 Tmp=cross(u,ux); TmpA=sqrt (Tmp (1) *Tmp (1) +Tmp (2) *Tmp (2) +Tmp (3) *Tmp (3) ) ; 
121 uyp=Tmp/TmpA; uxp=cross(uyp,uzp); R=[uxp,0;uyp,0;uzp,0;0,0,0,1]; 
122 vp=(R*[v’ ;ones(1,vn)])’; vp=vp(:,1:2); ad=min(vp,[],1); 

123 vp=vp- [ad (1) *ones(vn,1) ,ad(2) *ones(vn,1)];; pa ob 

124 for i=1:cn, 

125 Tmp=R* [c{i,4}’ 31]; Tmp=Tmp(1:2)’-ad; c{i,5}=Tmp; cs=[cs;Tmp]; 

126 end 

127 LB=min(vp(:,1)); UB=max(vp(: ,1)); Tmp=UB-LB; LBv=LB+0.1*Tmp; 

128 UBv=UB-LBv; Tmp=min(cs(:,1)); LB=min(cs(:,1)); UB=max(cs(:,1)); 

129 Tmp=UB-LB; LBc=LB+0.1*#Tmp; UBc=UB-LBc; 

130 % cell 

131 cvm=sparse(cn,vn) ; 

132 for i=1:cn, 

133 for j=i:cf{i,1}, 


134 evm(i,c{i,2}(j))=1; 
135 end 
136 end 


137 nghc=sparse(cn,cn) ; 
138 for i=1:(cn-1), 
139 for j=(it1):cn, 


140 Tmp=find(cvm(i,:) & cvm(j,:)); 
141 if (~isempty (Tmp) ) 

142 TmpN=size (Tmp, 2) ; 

143 if (TmpN>1) 

144 for k=1:TmpN, 

145 nghc(i,j)=1; nghc(j,i)=1; 
146 end 

147 end 

148 end 

149 end 

150 end 


151 N=cn; LMat=sparse(1,N); UMat=sparse(1,N); 
152 for i=1:cn, 
153 if (cs (i,1)<=LBc) 


154 LMat (1,i)=1; 
155 end 

156 if (cs (i,1)>=UBc) 
157 UMat (1,i)=1; 
158 end 

159 end 


160 NeMat=nghc; Blocked=randperm(N) ; 
161 % bond 
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[p.q.r]=find(triu(nghc)); b=[p,q]; bn=size(b,1); bcm=sparse(bn,bn) ; 
for i=1:bn, 
bem(i,b(i,1))=1; bem(i,b(i,2))=1; 
end 
nghb=sparse (bn, bn) ; 
for i=1:cn, 
Tmp=find(bem(: ,i)); 
if (~isempty (Tmp) ) 
TmpN=size(Tmp,1) ; 
for j=1:(TmpN-1), 
for k=(j+1):TmpN, 
nghb(Tmp(j) ,Tmp(k))=1; nghb(Tmp(k) ,Tmp(j))=1; 
end 
end 
end 
end 
N=bn; LMat=sparse(1,N); UMat=sparse(1,N) ; 
for i=1:bn, 
if ((cs(b(i,1),1)<=LBc) | (cs(b(i,2) ,1)<=LBc)) 
LMat (1,i)=1; 
end 
if ((cs(b(i,1),1)>=UBc) | (cs(b(i,2) ,1)>=UBc)) 
UMat (1,i)=1; 
end 
end 
NeMat=nghb; Blocked=randperm(N) ; 
4, vertice 
nghv=sparse (vn, vn) ; 
for i=1:cn, 
Tmp=[c{i,3},c{i,3}(1)]; 
for j=i:cf{i,1}, 
nghv(Tmp(j) ,Tmp(j+1))=1; nghv(Tmp(j+1) ,Tmp(j))=1; 
end 
end 
LMat=sparse(1,vn); UMat=sparse(1,vn) ; 
for i=1:vn, 
if (vp(i,1)<=LBv) 
LMat (1,i)=1; 
end 
if (vp(i,1)>=UBv) 
UMat (1,i)=1; 
end 
end 
N=vn; NeMat=nghv; Blocked=randperm(N) ; 
4 edge 
[p.q.rlJ=find(triu(nghv)); e=[p,q]; en=size(e,1); evm=sparse(en,en) ; 
for i=l:en, 
evm(i,e(i,1))=1; evm(i,e(i,2))=1; 
end 
nghe=sparse(en,en) ; 
for i=1:vn, 
Tmp=find(evm(: ,i)); 
if (~isempty (Tmp) ) 
TmpN=size(Tmp,1) ; 
for j=1:(TmpN-1), 
for k=(j+1):TmpN, 
nghe (Tmp(j) ,Tmp(k))=1; nghe(Tmp(k) ,Tmp(j))=1; 
end 
end 
end 
end 
N=en; LMat=sparse(1,N); UMat=sparse(1,N) ; 
for i=l:en, 
if ((vp(e(i,1),1)<=LBc) | (vp(e(i,2) ,1)<=LBc)) 
LMat (1,i)=1; 
end 
if ((vp(e(i,1),1)>=UBc) | (vp(e(i,2) ,1)>=UBc)) 
UMat(1,i)=1; 
end 
end 
NeMat=nghe; Blocked=randperm(N) ; 
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§ A.5 Continuum percolation of n-gons 


Conoaahlwnre 


4 regpoly.m 
clear all; St=sum(100*clock); rand(’state’,St); Size=10; N=40; n=11; Angle=2*pi/n; 
X=Size*rand(N,2); TwoPi=2*pi; Rad=TwoPi*rand(N,1); 
R=sqrt (1/ (n*sin(Angle/2) *cos(Angle/2) )) ; 
for i=1:N, 
for j=0:(n-1), 
Tmp=Rad(i,1)+j*Angle; V{i}{1, (j+1) }=[(X(i,1) +R*cos (Imp) ) , (X(i,2)+R*sin(Tmp))]; 
end 
end 


Tmp=V{1}{1,1}+(V{1}{1, 2}-V{1}{1,1})/2; dx=Tmp(1,1)-X(1,1); dy=Tmp(1,2)-X(1,2); 
r=sqrt (dx*dx + dy*dy); clf; hold on; 
for i=1:N, 

x=]; y=(1; 

for j=i:n, 

bsveba, 90,01; y=ly;V{i}{1,j}(1,2)]; 

en 

x=[x;V{i}{1,1}(1,1)]; y=Ly;V{i}{1,1}(1,2)]; plot(x,y); 
end 
plot ([0,Size,Size,0,0],[0,0,Size,Size,0]); axis equal; axis off; 
for i=1:N, 

Tmp=(]; 

for j=i:n, 

Tmp=(Tmp; [j ,V{i}{1,j}(1,2)]]; Tmp=sortrows(Tmp, 2) ; 

end 
end 
T=delaunay(X(:,1),X(:,2)); NT=size(T,1); D=sparse(N,N); Ov=sparse(N,N) ; 
Ovi=sparse(N,1); Pair=[]; Limbo=[]; Oclock=sparse(NT,NT) ; 
for i=1:NT, 

Tmp=(T(i,:) ,TC,1)]; 

for j=1:3, 


cl=Tmp(1,j); c2=Tmp(1,(j+1)); dx=X(c2,1)-X(c1,1); dy=X(c2,2)-X(c1,2); 
TmpA=sqrt (dx*dx + dy*dy); D(c1,c2)=TmpA; D(c2,c1)=TmpA; 
Pair=[Pair; [c1,c2;c2,c1]]; 
if (TmpA<=(2*r) ) 
Ov(c1,c2)=1; Ov(c2,ci)=1; Ovi(ci,1)=1; Ovi(c2,1)=1; 
elseif (TmpA<=(2*R) ) 
Limbo=[Limbo; [c1,c2;c2,c1]]; 
end 
end 
TmpB=atan (abs (dy/dx) ) ; 
if (dx>=0) 
if(dy>=0) % Quadrant 1 
Oclock(c1,c2)=TmpB; Oclock(c2,c1)=pi+TmpB; 
else % Quadrant 4 
Oclock(c1,c2)=TwoPi-TmpB; Oclock(c2,c1)=pi-TmpB; 
end 
else 
if(dy>=0) % Quadrant 2 
Oclock(c1,c2)=pi-TmpB; Oclock(c2,c1)=TwoPi-TmpB; 
else % Quadrant 3 
Oclock(c1,c2)=pi+TmpB; Oclock(c2,c1)=TmpB; 
end 
end 
end 
Tmp=Angle/2; Star=[]; 
for i=1:N, 
TmpA=[]; TmpB=Rad(i,1); 
for j=i:n, 
TmpA=[TmpA,mod((TmpB + (j-1)*Angle + Tmp) ,TwoPi)]; 
end 
Star=[Star;TmpA]; 
end 
Wobble=sparse(N,N); jWobble=sparse(N,N); TmpN=size(Limbo,1) ; 
for i=1:TmpN, 
Min=10; TmpA=Limbo(i,1); TmpB=Limbo(i,2); jMin=j; 
for j=i:n, 
Tmp=Star (TmpA, j) -Oclock(TmpA, TmpB) ; 
if (abs (Tmp) <abs (Min) ) 
Min=Tmp; jMin=j; 
end 
end 
Wobble (TmpA,TmpB)=Min; jWobble(TmpA,TmpB)=jMin; 
end 
Tmp=Angle/2; 
for i=1:2:TmpN, 
TmpA=Limbo(i,1); TmpB=Limbo(i,2) ; 
if (abs (Wobble (TmpB,TmpA)) >= abs (Wobble (TmpA, TmpB) ) ) 
TmpA=Limbo((i+1) ,1); TmpB=Limbo((it1) ,2); 
end 
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J=jWobble(TmpA,TmpB) ; v{1}=V{TmpA}{1, J}; 
if (J==n) 
v{2}=V{TmpA} {1,1}; 
else 
v{2}=V{TmpA}{1, (J+1)}; 
end 
J=jWobble(TmpB,TmpA); v{3}=V{TmpB}{1, J}; 
if (J==n) 
v{4}=V{TmpB} {1,1}; 
else 
v{4}=V{TmpB}{1, (J+1)}; 
end 
Max=0; 
if (Wobble (TmpA, TmpB) >=0) 
vMin=v{i}; 
else 
vMin=v{2}; 
end 


di=R*cos(Tmp-abs (Wobble (TmpA,TmpB))); TmpD=(X(TmpA,1)-X(TmpB,1)); 
a=(X(TmpA,2)-X(TmpB,2))/TmpD; b=(X(TmpA, 1) *X(TmpB, 2) -X(TmpB, 1) *X(TmpA,2)) /TmpD; 
al=a; bl=vMin(1,2)-al*vMin(1,1); x3=v{3}(1,1); y3=v{3}(1,2); x4=v{4}(1,1); 
y4=v{4} (1,2); TmpD=x3-x4; p=(y3-y4)/TmpD; q=(x3*y4-x4*y3)/TmpD; TmpD=al-p; 
x=(q-b1)/TmpD; y=(al*q-bi*p)/TmpD; dx=x-X(TmpB,1); dy=y-X(TmpB, 2) ; 

r2=sqrt (dx*dx + dy*dy); d2=r2*cos(Tmp-abs(Wobble(TmpB,TmpA))) ; d=D(TmpA,TmpB) ; 


if ((di+d2) >=d) 


Ov(TmpA,TmpB)=1; Ov(TmpB,TmpA)=1; Ovi(TmpA,1)=1; Ovi(TmpB,1)=1; 


end 
end 
Clus=0v; 
for i=1:N, 
Clus(i,i)=1; 
end 
NClus=size(Clus,1); ClusA=Clus(1,:); NClusA=1; 
for i=2:NClus, 
Joined=0; 
for j=1:NClusA, 
TmpC=Clus(i,:) | ClusA(j,:); 
if(sum(Clus(i,:) & ClusA(j,:))) 
ClusA(j,:)=TmpC; ClusB=ClusA; ClusA=TmpC; NClusB=NClusA; 
NClusA=1; Joined=1; break; 
end 
end 
if (~ Joined) 
ClusA=[ClusA;Clus(i,:)]; NClusA=NClusAt1; 
else 
for j=1:NClusB, 
if (sum(ClusA(1,:) & ClusB(j,:))) 
ClusA(1,:)=ClusA(1,:) | ClusB(j,:); 
else 
ClusA=[ClusA;ClusB(j,:)]; NClusA=NClusA+1; 
end 
end 
end 
end 
Left=sparse(1,N); Right=sparse(1,N); Margin=0.1*Size; 
for i=1:N, 
if (X(i,1)<=Margin) 
Left(1,i)=1; 
elseif (X(i,1)>=(Size-Margin) ) 
Right (1,i)=1; 
end 
end 
Plated=0; 
for i=1:NClusA, 
if(sum(Left & ClusA(i,:)) & sum(Right & ClusA(i,:))) 
Plated=1; break; 
end 
end 
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§ A.6 Tilings 


4, tiling.m; NB. must run one of the data below first. 
qn=size(q,1); in2n=size(in2,1); in3n=size(in3,1); p=]; 
p{i,1}=[0;0]’; p{1,2}=sz; r=[]; s=0; 
for i=1:sz, 

r(1,i)=dx(m(i)); s(1,i)=dy(n(i)); 
end 
p{i,3}=r’; p{1,4}=s’; iin=size(ii,1); Tmp=ones(iin,1); 
TmpA=sparse(Tmp,ii(:,1),Tmp,1,sz); Tmp=[]; TmpB=[]; TmpC=[]; count=0; 
for i=1:sz, 
10 if (~TmpA (i) ) 


CoOonoaa1rhlwnr 


11 count=count+1; Tmp=[Tmp;i,count]; TmpB=[TmpB;r(i)]; TmpC=[TmpC;s(i)]; 
12 end 
13 end 


14 p{2,1}=Tmp; p{2,2}=count; p{2,3}=TmpB; p{2,4}=TmpC; iiin=size(iii,1); 
15 Tmp=ones(iiin,1); TmpA=sparse(Tmp,iii(: ,1),Tmp,1,sz) ; 

16 Tmp=[]; TmpB=[]; TmpC=[]; count=0; 

17 for i=1:sz, 

18 if (~TmpA (i) ) 


19 count=count+1; Tmp=[Tmp;i,count]; TmpB=[TmpB;r(i)]; TmpC=[TmpC;s(i)]; 
20 end 
21 end 


22 p{3,1}=Tmp; p{3,2}=count; p{3,3}=TmpB; p{3,4}=TmpC; iv=[ii,2*ones(iin,1)]; 
23 for i=1:iiin, 


24 Tmp=0; 

25 for j=i:iin, 

26 if (iii(i,1)==ii(j.1)) 
27 Tmp=1; 

28 end 

29 end 

30 if (~Tmp) 

31 iv=[iv;iii(i,:) ,3]; 
82 end 

33 end 


34 ivn=size(iv,1); Tmp=ones(size(ivn,1),1); 

35 TmpA=sparse(Tmp,iv(:,1),Imp,1,sz); Tmp=[]; TmpB=[]; TmpC=[]; count=0; 
36 for i=1:sz, 

37 if (“TmpA(i)) 


38 count=count+1; Tmp=[Tmp;i,count]; TmpB=[TmpB;r(i)]; TmpC=[TmpC;s(i)]; 
39 end 
40 end 


41 p{4,1}=Tmp; p{4,2}=count; p{4,3}=TmpB; p{4,4}=TmpC; map=[]; Tmp=ones(sz,1); 
42 map{1,1}=sparse(p{1,1}(:,1),Tmp,p{1,1}(:,2) ,sz,1); count=p{1,2}; e=q; 
waletia) ptl.4)l ; Tmp=ones(p{2,2},1); 

44 for i=2:nx, 

45 map{i,1}=sparse (p{2,1}(: ,1) ,Tmp, count*Tmp+p{2,1}(: ,2) ,sz,1); 

46 for k=1:iin, 

47 map{i,1}(ii(k,1) ,1)=map{(i-1) ,1} (ii(k,2) ,1); 

48 end 

49 count=count+p{2,2}; % +iin; 

50 for k=1:qn 


51 e=[e;map{i,1}(q(k,1)) ,map{i,1}(q(k,2))]; 

52 end 

53 for k=1:in2n, 

54 e=[e;map{i,1}(in2(k,1)) ,map{(i-1) ,1}(in2(k,2))]; 
55 end 

56 v=[v; (i-1) *dim1*Tmptp{2,3},p{2,4}]; 

57 end 


58 Tmp=ones (p{3,2},1); 

59 for j=2:ny, 

60 map{1,j}=sparse (p{3,1}(: ,1) ,Tmp, count*Tmp+p{3,1}(: ,2) ,sz,1); 
61 for k=1:iiin, 

62 map{1,j}(iii(k,1) ,1)=map{1, (j-1)}(iii(k,2) ,1); 

63 end 

64 count=count+p{3,2}; % +iiin; 

65 for k=1:qn, 


66 e=[e;map{1,j}(q(k,1)) ,map{1, j} (q(k,2))]; 

67 end 

68 for k=1:in3n, 

69 e=[e;map{1,j}(in3(k,1)) ,map{1, (j-1)} (in3(k,2))]; 
70 end 

71 v=[v;p{3,3}, (j-1) *dim2*Tmptp{3, 4}] ; 

72 end 


73 Tmp=ones (p{4, 2}, 1); 
74 for i=2:nx, 
75 for j=2:n 


76 map{i,j =sparse(p{4,1}(:,1) ,Tmp, count*Tmp+p{4, 1}(:,2),sz,1); 
77 for k=1:ivn, 
78 if (iv(k,3)==2) 


79 map{i,j}(iv(k,1) ,1)=map{(i-1) ,j}(iv(k,2),1); 


132 
133 
134 
135 


140 
141 
142 
143 
144 
145 
146 
147 
148 
149 
150 
151 
152 
153 
154 
155 
156 
157 
158 
159 
160 
161 


Ph.D. Thesis, UMIST. K N Tiyapan. Appendix A: Programs 


else 
map{i,j}(iv(k,1) ,1)=map{i, (j-1)} Civ(k,2),1); 
end 
end 
count=count+p{4,2}; % +ivn; 
for k=1:qn, 
e=[e;map{i, j}(q(k,1)) ,map{i, j} (q(k,2))]; 
end 


for k=1:in2n, 
e=[e;map{i, j}(in2(k,1)) ,map{(i-1) ,j}(in2(k,2))]; 
end 
for k=1:in3n, 
= [e;map{i, j}(in3(k,1)) ,map{i, (j-1)}(in3(k,2))]; 
en 
v=[v; (i-1) *dim1*Tmp+p{4 ,3}, (j-1) *dim2*Tmp+p{4,4}]; 
end 
end 
en=size(e,1); vn=size(v,1); cn=size(c,1); 
for i=1:cn, 
c{i, 2}=size(c{i},2); 
end 
C=[]; count=0; 
for i=1:nx, 
for j=i:ny, 
for k=1:cn, 
count=countt1; 
C{count ,1}=[]; 
for m=1:c{k,2}, 
C{count ,1}=[C{count},map{i,j}(c{k,1}(m))]; 
end 
end 
end 
end 
ciin=size(cii,1); 
for i=1:ciin, 
ciifi,3}=size(ciif{i,1},2); ciifi,4}=size(cii{i,2},2); 
end 
ciiin=size(ciii,1); 
for i=1:ciiin, 
ciiifi,3}=size(ciiifi,1},2); ciiifi,4}=size(ciiifi,2},2); 
end 
for i=2:nx, 
for j=i1:ciin, 
count=countt1; C{count,1i}=[]; 
for k=1:cii{j,3}, 
C{count ,1}=[C{count} ,map{i,1}(cii{j,1}(k))]; 
end 
for k=1:cii{j,4}, 
C{count ,1}=[C{count} ,map{(i-1) ,1} (ciif{j,2}(k))]; 
end 
end 
end 
for i=2:ny, 
for j=i1:ciiin, 
count=countt1; 
C{count,1}=0); 
for k=1:ciii{j,3}, 
té 


C{count ,1}=[C{count},map{1,i}(ciii{j,1}(k))]; 
end 
for k=1:ciii{j,4}, 
Cieoant /1}=[¢tesant }maptt, (1) p(eaile yah UII 
end 
end 
end 


civn=size(civ,1); 
for i=1:civn, 
civ{i,5}=size(civ{i,1},2); civf{i,6}=size(civ{i,2},2); 
civ{i,7}=size(civ{i,3},2); civ{i,8}=size(civ{i,4},2); 
end 
for i=2:nx, 
for j=2:ny, 
for m=1:ciin, 
count=count+1; C{count,1}=[]; 
for k=1:cii{m,3}, 
C{count ,1}=[C{count},map{i,j}(cii{m,1}(k))]; 
end 
for k=1:cii{m,4}, 
C{count ,1}=[C{count},map{(i-1) ,j} (cii{m, 2}(k))]; 
end 
end 
for m=1:ciiin, 
count=countt1; 
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162 C{count ,i}=0]; 

163 for k=1:ciii{m,3}, 

164 C{count ,1}=[C{count} ,map{i,j}(ciii{m,1}(k))]; 
165 end 

166 for k=1:ciii{m,4}, 

167 C{count , 1}=[C{count},map{i, (j-1)} (ciii{m, 2}(k))]; 
168 end 

169 end 

170 for m=1:civn, 

171 count=count+1; 

172 C{count ,i}=0]; 

173 for k=1:civ{m,5}, 

174 C{count ,1}=[C{count},map{i, j}(civ{m,1}(k))]; 

175 end 

176 for k=1:civ{m,6}, 

177 C{count , 1}=[C{count} ,map{(i-1) ,j}(civ{m, 2} (k))]; 
178 end 

179 for k=1:civ{m,7}, 

180 C{count , 1}=[C{count} ,map{(i-1) , (j-1) } (civ{m, 3} (k))]; 
181 end 

182 for k=1:civ{m,8}, 

183 C{count ,1}=[C{count} ,map{i, (j-1)} (civ{m, 4} (k))]; 
184 end 

185 end 

186 end 

187 end 


188 Cn=size(C,1); 

189 for i=1:Cn, 

190 C{i, 2}=size(C{i,1},2); 
191 end 

192 x=[]; 

193 for i=1:Cn, 

194 Tmp=[0,0]; 

195 for j=1:C{i,2}, 


196 Tmp=Tmptv(C{i,1}(j).:)3 
197 end 

198 x=[x;Tmp/C{i,2}]; 

199 end 


200 xn=size(x,1); 

201 % for Cells 

202 B=[]; Bxx=sparse(Cn,Cn); NeCMat=sparse(Cn,Cn); CVMat=sparse(Cn,vn) ; 
203 for i=1:Cn, 

204 for j=1:C{i,2}, 


205 CVMat (i,C{i,1}(j))=1; 
206 end 
207 end 


208 count=0; 

209 for i=1:vn, 

210 Tmp=find(CVMat(:,i)); TmpN=size(Tmp,1) ; 
211 for j=1:(TmpN-1), 


212 for k=(j+1) :TmpN, 

213 if (~NeCMat (Tmp(j) , Tmp(k) )) 

214 count=countt1; NeCMat (Tmp(j) ,Tmp(k))=1; NeCMat (Tmp(k) ,Tmp(j))=1; 

215, B=[B;Tmp(j),.Tmp(k)]; Bxx(Tmp(j),Tmp(k))=count; Bxx(Tmp(k) ,Tmp(j))=count; 
216 end 

217 end 

218 end 

219 end 


220 Bn=count; A=x; N=size(A,1); LMat=sparse(1,N); UMat=sparse(1,N); 
221 LB=min(x(:,1)); UB=max(x(:,1)); rng=UB-LB; 

222 % LBc=.05*rng+LB; 

223 LBc=.1*rng+LB; UBc=UB-LBc; 

224 for i=1:N, 

225 if (A(i,1)<=LBc) 


226 LMat (1,i)=1; 

227 elseif (A(i,1)>=UBc) 
228 UMat (1,i)=1; 

229 end 

230 end 


231 NeMat=NeCMat; Blocked=randperm(Cn) ; 

232 % for Bonds 

233 NeBMat=sparse(Bn,Bn) ; 

234 for i=1:Cn, 

235 [p.q,rJ=find(Bxx(i,:)); nc=size(r,2); 
236 for j=1:(nc-1), 


237 for k=(j+1):nc, 

238 NeBMat (r(1,j),r(1,k))=1; NeBMat(r(1,k) ,r(1,j))=1; 
239 end 

240 end 

241 end 


242 A=B; N=size(A,1); LMat=sparse(1,N); UMat=sparse(1,N) ; 
243 for i=1:N, 
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if ((x(A(i,1),1)<=LBc) | (x(A(i,2),1)<=LBc)) 
LMat (1,i)=1; 
elseif ((x(A(i,1),1)>=UBc) | (x(ACi,2) ,1)>=UBc)) 
UMat (1,1) =1; 
end 
end 
NeMat=NeBMat; Blocked=randperm(Bn) ; 
¥, for cells 
b=[]; bxx=sparse(Cn,Cn); NecMat=sparse(Cn,Cn); count=0; 


for i=1:(Cn-1), 
for j=(it1):Cn, 


if(sum(CVMat(i,:) & CVMat(j,:))==2) 
count=count+1; NecMat(i,j)=1; NecMat(j,i)=1; b=[b;i,j]; 
bxx(i,j)=count; bxx(j,i)=count; 
end 
end 
end 


bn=count; A=x; N=size(A,1); LMat=sparse(1,N); UMat=sparse(1,N) ; 
for i=1:N, 
if (A(i,1)<=LBc) 
LMat (1,i)=1; 
elseif (A(i,1)>=UBc) 
UMat (1,i)=1; 
end 
end 
NeMat=NecMat; Blocked=randperm(Cn) ; 
%, for bonds 
NebMat=sparse (bn, bn) ; 
for i=1:Cn, 
[a, bb, c]=find(bxx(i,:)); nc=size(c,2); 
for j=1:(nc-1), 
for k=(j+1):nc, 
NebMat (c(1,j),c(1,k))=1; NebMat(c(1,k) ,c(1,j))=1; 
end 
end 
end 
A=b; N=size(A,1); LMat=sparse(1,N); UMat=sparse(1,N) ; 
for i=1:N, 


if ((x(A(i,1),1)<=LBc) | (x(A(i,2),1)<=LBc)) 
LMat (1,i)=1; 
elseif ((x(A(i,1),1)>=UBc) | (x(ACi,2) ,1)>=UBc)) 
UMat (1,i)=1; 
end 
end 
NeMat=NebMat; Blocked=randperm(bn) ; 


¥, for vertices 
NeVMat=sparse(vn,vn) ; 
for i=l:en, 

NeVMat (e(i,1),e(i,2))=1; NeVMat(e(i,2) ,e(i,1))=1; 
end 
A=v; N=vn; LMat=sparse(1,N); UMat=sparse(1,N); LB=min(v(:,1)); 
UB=max(v(:,1)); rng=UB-LB; LBv=.05*rng+LB; UBv=UB-LBv; 
for i=1:vn, 

if (v(i,1)<LBv) 

LMat (1,i)=1; 
end 
if (v(i,1) >UBv) 
UMat (1,i)=1; 

end 
end 
NeMat=NeVMat; Blocked=randperm(vn) ; 
4 for edges 
EVMat=sparse(en,vn) ; 
for i=l:en, 

EVMat(i,e(i,1))=1; EVMat(i,e(i,2))=1; 
end 
NeEMat=sparse(en,en) ; 
for i=1:vn, 


Tmp=find(EVMat(:,i)); TmpN=size(Tmp,1) ; 
for j=1:(TmpN-1), 
for k=(j+1) :TmpN, 
NeEMat (Tmp(j),Tmp(k))=1; NeEMat (Tmp(k) ,Tmp(j))=1; 
end 
end 
end 
A=e; N=en; LMat=sparse(1,N); UMat=sparse(1,N) ; 
for i=1:N, 
if ((v(A(i,1),1)<=LBv) | (v(A(i,2),1)<=LBv)) 
LMat (1,i)=1; 
elseif ((v(A(i,1),1)>=UBv) | (v(ACi,2) ,1)>=UBv)) 
UMat (1,i)=1; 
end 
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326 end 

327 NeMat=NeEMat; Blocked=randperm(N) ; 

328 % At the end of the day. 

329 figure(1); clf; hold on; 

330 for i=l:en, 

331 plot([v(e(i,1),1) ,v(e(i,2) ,1)], [v(e(i,1) ,2) ,v(e(i,2) ,2)]); 

332 end 

333 figure(2); clf; hold on; 

334 for i=1:bn, 

335 plot ([x(b(i,1),1),x(b(i,2),1)], [k(b(i,1) ,2) ,x(b(i,2) ,2)]); 

336 end 

337 figure(3); clf; hold on; 

338 for i=1:Bn, 

339 = plot ([x(B(i,1) ,1) ,x(B(i,2),1)], [x(B(i,1) ,2) ,x(B(i,2) ,2)]); 

340 end 

341 % Here come data to be run first, though listed last. 

342 % (1) 3_3[3°3]7_1[3°7] 

343 clear all; sz=20; nx=7; ny=4; dx=0.5*[0;1;2;4;6;7;8;10;12]; Tmp=sqrt(3)/2; 
344 dy=Tmp*[0;1;2;4;5;6;7;8;10;11;12]; dimi=max(dx); dim2=max(dy) ; 

345 g=[1,2; 1,4; 2,3; 3,5; 4,7; 5,6; 5,8; 7,8; 7,9; 8,10; 9,12; 10,11; 10,14; 12,13;... 


346 13,14;,13,15; 14,16; 15,19; 16,17; 16,18; 18,20]; 

347 m=(3,4,6,1,7,9,3,5,2,7,8,2,3,5,1,7,9,6,3,4]; 

348 n=(1,1,2,3,3,3,4,4,5,6,6,7,8,8,9,9,9,10,11,11]; 

349 0=[1,2,3,4,5.6,7,8,9,10,11,12,13,14,15,16,17,18,19, 20]; 

350 ii=[4,6;15,17]; iii=[1,19;2,20]; in2=[9,11;12,11]; in3=[3, 18]; 
351 c={[1.2,3,5,8,7,4];[7,8,10,14, 13,12,9];[13,14,16,18,20,19.15]}; 
352 cii={(4,7,91,[11,10,8.51]; [9,12] , [11]; [42, 13,15], [16,14,10.11]}; 
353 ciii={[2,3],[18]}; civ={{1, 4], (3, 5], [i8, 16, 17], CI}; 


354 % (2) 3_3[373]9_3[3°9]_II 

355 clear all; sz=19; nx=4; ny=5; Tmp=1/sqrt(3); dx=Tmp*[0,1,2,3,4,5,6,7,8,9,10,11,12]; 
356 Tmp=1/3; dy=Tmp*[0,2,4,6,7,8,9,11,13,15,16,17,18]; dim1i=max(dx); dim2=max (dy) ; 
357 g=L1,3;2,433,5;3,6;4,7;4,9;5,6;5,9;6,8;7,10;8,11;9,12;10,13;12,15;... 

358 12,16;13,17;14,19;15,16;15,18;16,19;17,18]; 

359 m=[10,4,10,4,9,11,2,12,7,1,13,7,1,13,6,8,3,5,10]; 

360 n=(1,2,3,4,5,5,6,6,7,8,8,9,10,10,11,11,12,12,13]; 

361 0o=[(1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19]; 

362 ii=[10,11;13,14]; iii=[1,19]; in2=[7,8]; in3=[2,17;2,18]; 

363 c={[3,6,5];[4,9,12,15,18,17,13,10,7]; [12,16,15];[11,14,19,16,12,9,5,6,8]}; 

364 cii={[7,10] ,[8];}; ciii={[2], [17,18] ;[1,3,5,9,4,2], [18,15,16]}; 

365 civ={[2,4,7],[8,6,3,1], [14], [1}; 

366 % (3) 4_4[374]8_4[378] 

367 clear all; sz=8; nx=10; ny=10; Tmp=1/sqrt(2); dx=[0,Tmp,1+Tmp,1+2*Tmp] ; 

368 dy=(0,Tmp,1+Tmp,1+2*Tmp]; diml=max(dx); dim2=max(dy) ; 

369 oe eee i eee n=[1,1,2,2,3,3,4,4]; 

370 o=[1,2,3,4,5 7 


371 c={[1,2,4,6,8,7,5 53}; cii= ths ciii= Oh civ={[1, 3], [2], [6], (3; 

372 % (4) 3_3[3°3]8_2[378] 

373 clear all; sz=25; nx=3; ny=6; dx=[0,1,2,3,4,5,6,7,8,9,10,11,12]; 

374 dy=.5*[0,2,4,5,6,8,10, it, 12]; diml=max(dx); dim2=max(dy) ; 

375 q=[1,4;2,6;3,5;4,7;4,8; 5,9;5,10;6,12;6,13;7,8;7,11;8,12;9,10;9,13;10,14;11,17; 
376 12,15;13,16;15,19;15,20; 16, a1; 16. 22; iz, 23; is, 25; 19, 20; ig. 23; 20, 24; 21, 22; 21, 24; 22 525]; 
377 m=[3,7,11,3,11,7,2,4,10,12, 4 5,9, 13, 5, 9,1, 13, 4, 6,8, 10, 3, 7; 11]; 

378 n=[1,1,1,2,2,3,4.4,4,4,5,5,5,5,6,6,7,7,8,8,8.8,9,9,9]; 

379 o=[1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20,21,22,23,24,25]; 

380 11=[11,14;17,18]; iii=[1,23;2,24;3,25]; in2=[]; in3=(]; 

381 c={[4,8,7];05,10,9];(7,8,12,15,19,23,17,11]; 16,13,16,21,24,20,15,12];... 


382 9,10, i4, 18,25,22,16,13];[15,20,19];[16,22,21]}; cii={}; 

383 ciii={[2, 6,12,8,4,1], [19,20]; [3,5,9,13,6,2] , [21,22]}; 

384 civ={[1,4,7,11],[10,5,3], [18], 0}; 

385 % (5) 3_3[3°73]9_3[37 9]_ III 

386 clear all; sz=12; nx=6; ny=4; Tmp=sqrt(3)/2; dx=Tmp*[0,1,2,3,4]; 
387 dy=.5*[0,3,5,6,9,11,12]; dimi=max(dx); dim2=max(dy); 


388 g=[1,2;1,3;2,3;3,4;4,53;4,6;5,7;6,8;7,9;9,11;10,12]; 

389 m=[(2,4,3,3,2,4,1,5,1,5,2,4]; n=[1,1,2,3,4,4,5,5,6,6,7,7]; 

390 o=[1,2,3,4,5,6,7,8,9,10,11,12]; ii=[7,8;9,10]; iii=[1,11;2,12]; in2=[5,6]; in3=(]; 
391 c={[1,2,3];[4,6,8,10,12,11,9,7,5]}; cii={[5,7],[6]}; ciii={}; 

392 civ={[1,3,4,5],[6,4,3,2], [10], []}; 

393 % (6) 4_3[374]10_6[3710]_I 

304 clear all; sz=20; nx=8; ny=4; dx=[0,2,3,5,6]; dy=3*[0,1,2,3,4]; 

395 dimi=max (dx) ; dim2=max (dy) ; 

3906 g=[1,2;1,6;2,3;2,7;3,4;4,5;6,7;6,9;7,10;9,10;10,11;11,12;11,14;12,13;12,15;14,15;14,18;15,19]; 
3907 m=[1,2,3,4,5,1,2,5,1,2,3,4,5,3,4,1,2,3,4,5]; 

398 n=(1,1,1,1,1,2,2,2,3,3,3,3,3,4,4,5,5,5,5,5]; 

399 o=[1,2,3,4,5,6,7,8,9,10,11, 12,13,14,15,16,17,18,19,20]; 

400 i11=[1,5;6,8;9,13;16,20]; iii= EL 16;2 Rie 3,18;4, 19; 5 >20]; in2=[]; in3=[]; 

401 c={[1,2,7,6];[2,3,4,5,8,13,12,11, 10, 71; (6. ae io. 9]; [i1, 12,15,14];[14,15, i9, 18]}; 
402 cii={[9,10,11,14,18,17,16], [19, 15, 121}; ciii= rh. cists 

403 %4 (7) 3_3[373]9_3[3°9]_I 


404 clear all; sz=37; nx=5; ny=3; x=2*sqrt(3)/(2+sqrt(3)); i=1/2; j=sqrt(3)/2; 

405 dx=x*[0, i, itj, Q*i+j, S¥#itj, Sit2*j, 4*1+2*j, 5¥*i+2*j, Belagej 

406 6*i+3*j, 7*it3*j, 7*1+4*j, 8*i44*j]; y=1/2/sqrt (3) ; 

407 dy=x*[0, 2*y, 2*yt1, 4*y+1, Styt1, S*yt1.5, 6eyt1.5, S#yt1.5, 8#yt+2.5, 10*yt+2.5,... 
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11#y+2.5, 11#y+3, 124y+3, 14*y+3, 1deyt+4, 16*y+4, 17#y+4, 17*y+4.5, 18#y+4.5,... 
20*y+4.5, 2O*yt5.5, 22*yt+5.5, 23*yt5.5, 2*yt6, 24*y+6]; diml=max(dx); dim2=max(dy) ; 
g=[1,4;2,3;3,5;3,6;4,8;4,9;5,6;5,7;6,9;7,10;8,11;9,14;10,12;12,15;13,16;14,17; 14,19;... 
15,19;16,18;17,18;17,20;18,20;19,22;20,21;21,23;21,24;22,25;22,27;23,24; 23,26;... 

24 ,28;25,26;25,29; 26,29; 27, 31;29,30;30,33;30,34;31,35;32,37;33, 34; 33,36 ;34,37;35,36]; 
m=[10,4,4,10 »1,13,1,13,7,2,12,9,11,4,10,10,4,9,... 
°3.3, 5,10]; 
»9,9,10,11,11,12,12,13,14,15,16,17,... 
»22,23,23,24,24,25]; 

oS 12, 13, i4, is. i6, 17,18,19,20,21,22,23, 

1,32, 33, 34, 35, 36, 371; ii=[10, 11; 12, 13; 27, 28; 31,32]; 
16]; in3=[2,35;2,36]; 
c={[3,6,5];(5,6,9, ja 19° 15,12,10,7];(4,8,11,13,16,18,17,14,9];... 

[14,17,20,21,23, 26, 25,22,19]; (17,18, 20] ; (21,24, 23] ; [22,25,29,30,33,36,35,31,27];... 
[23,24,28.32, 37,34,30, 29,26]: [25.26.29]; [30,34,33]}; 
cii={(7,10] , [8]; [12,15], [16]; [15,19,22,27] , [24,21,20,18,16]}; 
ciii={[2] , [35,36]; [1,4,9,6,3,2], [36,33,34]}; civ={[2,3,5,7],(8,4,1], [32] ,[35]}; 
% (8) 4 _2[374]10_4[3710] 
clear all; sz=42; nx=3; ny=6; i=sqrt(3)-1; j=1/2; k=sqrt(3); 
dx=(0, i, k-j, k, k+j, kti, 2*k-i, 2*k-j, 2*k, 2*k+j, 3*k-i, 3*k, 3¥#k+i,... 

4*k-j, 4*k, 4*k+j, 4*kt+ti, 5*k-i, 5*k-j, 5*k, 5*k+j, 6*k-i, 6*k]; 
i= (2/33* (3-eqrt (3)); jai/sqrt (3); k=1/2/sqrt (3) ; 
dy=(0, i, 2-k, 2, 2+j, 3, 3+i, 5-k, 5, 5+j, 6]; diml=max(dx); dim2=max(dy) ; 
q=[1,11;2,5;3,6;5,7;5,8;6,9;6,10;7,12;7,15;8,12;8,17;9,13;9,18;10,13;... 
10,20;11,21;12,16;13,19;14,23;15,16;15,21;16,17;17,22;18,19;18,22;19,20;... 

20 ,23;21,24;22,31;23,25;24,26;24,27;25,28;25, 29; 26,30; 26,33; 27 ,30;27,35;... 

28, 32;28,36;29,32;29,38;30, 34;31,40;31,41;32,37;33,34;33,39;... 
36, 37;36,41;37,38;38 *42]; 
9 15 ,10, 14, 16, 1,9,15,23,6,9,11, 135 15,18,4,12,20,4, 
1 


20 
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Ne 
cote 


3, 3, 4, 4, 4, 4. 5, 5, 5, 2B 5, 5, 6, 6, é yee 

0, 10,10,10,10,10,11, 11,11,14]; 

9,10,11,12,13,14,15,16,17,18,19,20,21,22,23,24,... 

31 »32,33,34,35,36,37,38,39,40,41,42]; 

1; iii=[1,39;2,40;3,41;4,42]; in2=[]; in3=(]; 

c={[(5,8,12,7]; [6,10,13,9];[7,12,16,15];[(8,17,16,12];[9,13,19,18]; [10,20,19,13];... 
[15 ,16,17,22,31,40,35,27, 24,21] ; [18,19,20,23,25,28,36,41,31,22]; [24,27,30,26];... 
[25 29, 32,28] ; [26,30,34,33] ; [27,35,34, 30] ; [28,32, 37,36] ; [29,38,37,32]}: 

cii={[11,21,24,26,33,39], [38,29,25,23]}; 

ciii={(2,5,7,15,21,11,1], [33,34,35];[3,6,9,18,22,17,8,5,2],[31];... 
[4,14,23,20,10,6,3], [36,37,38]}; civ={}; 

% (9) 4_3[374]10_6[3710]_II 

clear all; sz=56; nx=5; ny=3; i=2/(2- 1/sqrt (3)); n=saqrt (3) ; 

ja. 5*(1.5%i- sqrt (3)); k=i/2; p=n-n*(1-i/n)-j; q=i; 

dx=[0,j,k,p,q,n,n+j,ntk,ntp, ntq,2#n,2*n+j ,2*ntk, 2+ntp, 2*ntq,3*n,3#ntj,... 
3*ntk,3*n+p, 3entq,4*n] ; m=3; j= 2i*(1/241/n)-1; tmp=1-i/sqrt (3) ; 

p=i; k=p-tmp; q=p+tmp; r=qti/2; s=2ti; 

dy=(0,j.k.p.q.r,s,m,mtj,mtk,m+p,mtq,mtr,mts,2*m,2#m+j,2*mtk, 2*mtp,2#mt+q,2*mtr,. 
24mts ,3*m,3+*mt+j, 3amtk, 3*mtp ,3+*mtq, 34mtr, 34m+s 44m] ; dimi=max (dx) ; dim2-max (dy); 

q=[1,2;1,73;2,8;3,6;5,6;6,10;7,8;7,12;8, 13; 10, 11; 10,14;11,18;11,19;12,13;13,16; 
14,17; 14, 19; 15, i8; 16, i7; 16, 21; i7. 22; 18, 20; 19, 20; 20, 23; 21, 22; ai, 25; 22, 26; 23, 7; ae 
24, 28;25 26; 25,28; 26,29; 27. 30;27,31;28.32;29,30;29,33;30,34;32,35;33.34;33.38;... 
34 ,39;35,36;35,37;36,41;36,44;37,44;38,39;38,41;39,42;40,43;41,45;42,43;42,46;... 
43 ,47;44,45;45,48;46,47;46,51;47,52;48,49;48,50;49,55;50,54;51,52;51,55;52,56]; 

m=[1,5,15,21,9,13,1,5,21,13,17,1,5,11,21,6,10,20,14,18,6,10,18,2,6,10,16,... 
§,11,15,19,3,11,15,3,7,1,11,15,21,10,16,20,4,8,16,20,8,12,6,16,20,1,5,15,21]; 

n=[1,1,1,1,2,3,4,4,4,5,6,7,7,7,7,8,8,8,9,10,11,11,12,13,14,14,14,... 
15,15,15,16,17,18,18,19,20,21,21,21,21,22,22,22,23,24,25,25,26,27,28,28,28,29,29,29,29]; 

o=[1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20,21,22,23,24,25,26,27,... 
28,29,30,31,32,33,34,35,36,37,38,39,40,41,42,43,44,45,46,47,48,49,50,51,52,53,54,55,56]; 

1i=[1,4;7,9;12,15;37,40;53,56]; iii=[1,53;2,54;3,55;4,56]; 

in2=[24,23;24,31;32,31]; in3=[5,49;5,50]; 

c={[1,2,8,7];[7,8,13,12]; [10,11,19,14]; (11,18, 20,19]; [14,19,20,23,27,30,29,26,22,17];... 
[16,17,22,21]; [21,22,26,25]; [25,26,29,33,38,41,36,35,32,28] ; [29,30,34,33];... 
[33 ,34, 39,38] ; [35,36,44,37]; [36,41,45,44] ; [38,39,42,46,51,55,49,48,45,41];... 
[42 ,43,47,46] ; [46,47,52,51]}; 

cii={[12,13,16,21,25,28,24], [23,20,18]; [24] , [31,27,23]; (24,28,32],[31];... 
[32,35,37] , [43,42,39,34,30,27,31] ; [37,44,45,48,50,54,53], [52,47,43]}; 

ciii={[5,6,10,14,17,16,13,8,2], [50]; [5], [50,48,49]; [5,6,3],[49];... 
[4,9,15,18,11,10,6,3], [51,52]};civ={}; 

% (10) 4_2[3°74]8_2[378] 

clear all; sz= =32; nx=4; ny=6; i=1/2; j=sqrt(3); 

dx=[0,1,2*i1,j,2#j,3+*j- -24i »3*j-1,3*j, aijtt, 34j+2*1,4*j,5*j,6*j-2*1,6*j-1,6*j]; 

i= (2+ (sqrt (3)-1)) /sqrt (3) ; je (sqrt (3) /2) 44; k=(1/2/sqrt (3))+j; m=itsqrt (3); 

n=3; dy=(0,i1,j,k,m,n,nti,n+j,ntk,ntm,2*n]; diml=max(dx); dim2=max(dy) ; 

g=[1,5;2,10;3,11;5,7;6,8;7,9;7,14;8,12;8,15;9,13;10,17;10,18;11,18;11,19;13,14;... 
14,17;15,16;15,19;17,23;18,20;19,25;20,21;20,22;21,24;21,26;22,24;22,28;23,29;... 
23,30;24,27;25,31;25,32;26,27;26,30;27,28;28,31]; 

m=[1,5,11,15,1,15,2,14,1,5,11,15,1,3,13,15,4,8,12,8,7,9,4,8,12,6,8,10,1,5,11,15]; 

n=[1,1,1,1,2,2,3,3,4,4,4,4,5,5,5,5,6,6,6,7,8,8,9,9,9,10,10,10,11,11,11,11]; 

o=[1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20,21,22,23,... 
24,25,26,27,28,29,30,31,32]; 
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490 i11=[1,4;5,6;9,12;13,16;29,32]; iii=[1,29;2,30;3,31;4,32]; in2=[]; in3=0; 

491 c={([7,14,13,9];[8,12,16,15]; [10,18,20,21,26,30,23,17]; [11,19,25,31,28,22,20,18];... 
492 [20,22,24,21];[21,24,27,26];[22,28,27,24]}; cii={[5,7,9],(8];[13,14,17,23,29],[25,19,15]}; 
493 ciii={[2,10,17,14,7,5,1], [23]; (3,11,18,10,2] , [26,27,28]}; 

494 civ={[1],[6,8,15,19,11,3], [25], [1}; 

495 % (11) 4_3[3°4]8_3[378]_I 

496 clear all; sz=22; nx=9; ny=3; m=sqrt(3); i=2/(2-1/m); n=m/2; tmp=(m-i)/2; 

497 tmpi=i/4; j=n-tmp1; k=n-tmp; p=n+tmp; q=nttmp1; 

498 dx=[0,j,k,p.q,m,m+j,mtk,mtp,mtq,2*m]; m=2; n=1; tmp=.5*(1-itsqrt (3) *i/2); tmp1=2*tmp; 
499 j=m-tmp1; k=j+i/2; p=mttmp; g=mtn-tmp; r=pti/2; s=mtnttmp1; u=2*mtn; t=utn; 

500 dy=(0,j.k,p.g,r,s,u,t,tt+j,tt+k,ttp,ttq,ttr,tt+s,ttu,2#t]; dimi=max(dx); dim2=max(dy) ; 
501 g=[1,3;3,5;4,6;5,7;5,8;6,7;7,9;8,9;9,10;10,11;10,12;11,13;13,16;14,15;15,17;... 

502 15,18:16,17;17,19;18, 19:19, 20;20,21; 20,22]; 

503 m=[1,11,1,11,5,9,8,2,6,6,1,11,1,11,7,3,4,10,6,6,1,11]; 


504 n=[1,1,2,2,3,4,5,6,7,8,9,9,10,10,11,12,13,14,15,16,17,17]; 

505 o=[1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20,21,22]; 

506 ii1=(1,2;3,4;11,12;13,14;21 °291; 1ii=[1,21;2,22]; in2=[8,6;16,18]; in3=[]; 

507 c={(5,7,9,8];[10,12,14,15, 17, 16, 13,11]; [15,18,19,17]}; 

508 cii={(3,5,8], [6] ;[8,9,10,11], [10,9.7,6]; [13,16] , [18,15] ; [16,17, 19,20, 21] , [20,19,18]}; 
509 ciii={[2,4,6,7,5,3,1], [201}; civ= th; 

510 % (12) 4_3[374]8_3[3°8] _II 

511 clear all; sz=41; nx=5; ny=3; dx=[0,1,2,3,4,5,6,7,8,9,10,11,12]; 

512 dy=2.5*(0,1,2,3,4,5,6, 7: 8 dimi=max(dx); dim2=max (dy) ; 

513 q=[1,2;1,10;2,3;3,4;4,5;4, 8; 5,6;5,9;6,7;8,9;8,12;9, 13; 10,11;11,12;11,20;12,13;13,14; 
514 14,15;14,17;15,16;15,18; i7, 18; 17. 22; 18, 23; 19. 20; 19, 25; 20, 24; 2, 22; ai, 30; 22, 23; 23, 24; 
515 2426325 .27; 26, 32;27,28;28,29;28, 33:29. 30;29,34;30,31;31,32;31,40;33,34;33, 36; 34 °37]; 
516 m=[1,3,5,6,8,10,13,6,8,1,4,6,8,9,11,13,9, 11, 2,4, 7, 9, 

517. 11,12,2,12,2,3,5,7,10,12,3,5,1,3,5,6,8,10, 13]; 

518 n=[1,1,1,1,1,1,1,2,2,3,3,3,3,3,3,3,4,4,5,5,5,5,5,5,6,6,7,7,7,7,1,1,8,8,9,9,9,9 ecu 
519 o=[1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16, i7, 18, ig. 20, 1, 22, 23, 24, 25, 26, a7. 

520 28,29,30,31,32,33,34,35,36,37,38,39,40 Ail; ii=[1, 7;10, 16; 35 (411; 

521 iii=[1,35;2,36;3,37;4,38;5,39;6,40;7,41 1; in2=[19,24;25,26;27,32]; in3=0); 

522 c={[1,2,3,4,8,12,11,10];[4,5,9,8];[5,6,7,16,15,14,13,9]; (8,9, 13, 12]; 


523 [11,12,13,14,17,22,21,20];[14,15,18, 17]; [17,18, 23, 22] ; [19.20, 21,30, 29, 28,27,25];... 
524 [21,22, 23,24, 26,32, 31,30, 21] ; (28,29, 34,33] ; [33,34,37,36]}: 

525 cii={[10,11,20,19] , [24,23,18,15,16]; [19,25] , [26,24]; [25,27], [32,26]}; 

526 ciii={[3,4,5,6],[34,29,30,31]}; civ={[1],[6] , [31,32], [27,28,33,36]}; 

527 % (13) 4_3[3°4]8_3[3°8]_III 

528 clear all; sz=22; nx=10; ny=3; x=16*sqrt(3)/(4*(sqrt(3)+1)); i=x/4; j=2*sqrt (3); 

529 dx=(0,1,2*i,j-2*i1,j-i,j,j+i, j+2*i,2*j-2*i,2*j-i,2*j]; i=(sqrt(3)/4)*x; j=12; 

530 dy=[0,x,x+i,x+2i, j-2-x-2*i, j-2-x-i, j-2-x,j-2,j,jt+x,j+xti, jtxt2*i,2*j-2-x-2ei,... 


531 2*j-2-x-i,2*j-2-x,2*j-2,2*j]; diml=max(dx); dim2=max(dy) ; 

532 g=[1,3; 3,7:4,5;5,6:6,7;7,8;8,93;9,10;10, 11;10,12;11,13;13,15;14,17;15,16;16,17;17,18;... 
533 18,19;19,20;20,21;20,22]; m=[1,11,1,11,10,9,8,7,6,6,1,11,1,11,2,3,4,5,6,6,1,11]; 

534 n=(1,1,2,2,3,4,5,6,7,8,9,9,10,10,11,12,13,14,15,16,17,17]; 

535 o=[1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20,21,22]; 

536 i1=[1,2;3,43;11,12;13,14;21,22]; iii=[1,21;2,22]; in2=[8,5;9,6;15,18;16,19]; in3=(]; 

537 c= {[10, 12,14,17,16,15,13,11]}; 

538 cii= {[3, 7,8],05];(8,9],(16,5];(9,10,11],[10,9,8, ee eer [13,15], [17,18]; [15,16], [18,19];,,, 
539 ©[16,17, 18, 19, 20, 21], [i9, 201}; ciii= {[2, 4,5,6 3,11, [20]}; cive{} 


540 % (14) 4 -4[3* 4]7_ 2137 7)_II 

541 clear all; sz=33; nx=6; ny=5; dx=[0,1,2,3,4,5,6,7,8,9,10,11,12]; 

542 dy=4*[0,1,2,3,4]; diml=max(dx); dim2=max(dy) ; 

543 g=[1,2;1,8;2,3;3,4;4,5;4,10;5,6;5,11;6,7;8,9;9,10;9,16;10,11;11,12;12,13;12,18;... 
544 13,14;13,19;15,16;15,21;16,17;17,18;17,24;18,19;19,20;20,26;21,22;22,23;22,28;... 
545 23,24;23,29;24,25;25,26;25,32]; 


546 m=(1,3,5,6,8,10,13,1,4,6,8,9,11,13,2,4,7,9,11,12,2,3,5,7,10,12,1,3,5,6,8,10,13]; 

547 n=[1,1,1,1,1,1,1,2,2,2,2,2,2,2,3,3,3,3,3,3,4,4,4,4,4,4,5,5,5,5,5,5,5]; 

548 o=[1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20,21,22,23,24,25,26,... 

549 27,28,29,30,31,32,33]; ii=[1,7;8,14;27,33]; iii=[1,27;2,28;3,29;4,30;5,31;6,32;7,33]; 

550 in2=[15,20;21,26]; in3=[]; 

551 c={[1,2,3,4,10,9,8];[4,5,11,10];[5,6,7,14,13,12,11];(19,10,11,12,18,17,16]; [12,13,19,18];... 
552 [15,16,17,24,23,22, 21]; ere 18, i9, 20, 26, 25, 24]; (22, 33, 29, 381; [23, 24, 25, 32,31,30 291}; 


553 cii={[8,9,16,15], [20, 19,13]; [15, ai], [26, 201; [21, 22,28, 271, [32, 25 1261}; ciii={}; civ={}; 

554 % (15) 3 e3(3* 3]12_ 6[37 12] 

555 clear all; sz= 17; nx=8; ny=5; i= 2+sqrt (3) ; dx=[0,1,2,i,i+1,i+2,2*i]; 

556 i=sqrt (3) ; j=3+2*i; dy=[0, 1,1+2,2*1+2,j,jti, j+tit2, j+2*it2, *51; dimi=max(dx); dim2=max (dy) ; 
557 g=[1,2;1, 4; 3 4;4,5;5,6;5,7; 6, 73 7. 9;8, 10; 9,10;9,11;10,11;11,12;12,13;12,14;13,14;13,16;14,17]; 


558 m=[1, 3,7,2,2.1,3.7,4.6,5, 5,4,6,1,3 cae n=[1, 1, 1, 2,3, 4, 4,4, Bi 5,6, 7 8,8, 9, 9, 91; 
559 o=[1,2,3.4,5.6,7,8.9,10,11,12,13,14,15,16,171; 4i=[1,3;6,8;15,17]; 4ii=[1,15;2,16;3,17]; 
560 in2=[(]; in3=[]; c={[1,2,4];[5,7,6];[9,10,11] ; [12,14,13]}; 

561 cii={[6,7,9,11,12,13,16],[17,14,12,11,10]}; ciii={}; 

562 civ={[1,4,5,6],[10,9,7,5,4,2], [13,14], 0}; 

563 % (16) 4_4[3°74]7_2[3°7]_I 

564 clear all; sz=35; nx=6; ny=6; dx=[0,1,2,3,4,5,6]; dy=[0,1,2,3,4,5,6]; 

565 dimi=max (dx) ; dim2=max (dy) ; 

566 g=[1,2;1,7;2,3;3,4;3,12 Sag 8;7,10;8,9;8,14;10,11;10,16;11,12;11,17 

567. -12,13;13,14;13,18;14,19;16,17;17,22;18,19;18,23;19,20;20,21;20,28;22,23;... 
568 22.25; 23.26;24.25;24.30; 25,31;26,27; 26,33; 27, 28; 27,34;28 291; 

569 m=[(1,2,3,4,5,7,1,5,7,1,2,3, 4, 5,7, i, 2,4,5,6,7, 2 14,1,2,4,5,6,7, 1,2,3,4,5,7]; 
570 n=[(1,1,1,1,1,1,2,2,2,3,3,3,3,3,3,4,4,4,4,4,4,5,5,6,6,6,6,6,6,7,7, el »1,713 
571 o=L1,2, 3,4.5.6,7,8,9,10,11,12,13,14,15.16,17.18, 19,20,21,22,23,24,2 5.26, 
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27 ,28,29,30,31,32,33,34,35]; ii=[7,9;16,21;24,29]; 

iii=[1,30;2,31;4,33;5,34]; in2=[]; in3=; 

c={[1,2,3,12,11,10,7]; [3,4,5,8,14,13,12]; [13,14,19,18] ; [11,12,13,18,23,22,17];... 
(10,11,17,16]; [18,19,20,28,27,26,23]; [24,25,31,30] ; [26,27,34,33]}; 

cii={[16,17,22,25,24], [28,20]; [10], [21,20,19,14,8,9]}; 

ciii={[2,3,4],[25,22,23,26];}; civ={[1],[9,8,5], [27,28] , [24]}; 

% (17) 5_4[375]7_4[3°7]_I 

clear all; sz=75; nx=2; ny=3; i=sqrt(3)/2; 

dx=it[0,1,2,3,4,6,7,8,9,10,12,13,14,15,16,18,19,20,21,22,24]; 

dy=.5*[0,1,2,4,6,7,8,10,12,13,14,16,18,19,20,22, 24]; 

dim1=max (dx); dim2=max (dy) ; 

g=[1,7;1,10;2,10;2,11;3,11;3,12;4,12;4,13;5,13;5,14;6,8;6,15;7,9;7,25;8,14;9,18;... 
10,19;11,20;12,16;13,17;14,23;16,17;16,21;17,22;18,27;19,25;19,28;20,26;20,29;... 
21,29;21,30; 22, 30; 22,31; 23, 31;23,32;24,32;25,27;26,28;26,41; 27 ,35;28,36;29,37;... 
30, 38;31,33;32,34;33,34;33,39;34,40;35,43;35,44;36,44;36,45;37,41;37,46;38,42;... 
38 ,47;39,47;39,48;40,48;40,49;41,45;42,46;42,60;43,50;44,51;45,55;46,56;47,57;... 
48 ,58;50,51;50,53;51,54;53,62;54,62;54,63;55,63;55,64;56,64;56,65;57,60;57,66; 
58,61;58,67;59,67;60,65;61,66;62,70;63,68;64,69;65,73;66,74;67,75;68,69;68,71; 69 9,721; 

n=([3, 6,10,13,16,20,2,19, i, 5,8, it, 15, 18, 21, it, 15, 1, 5,8, it, 15, o a1, 4, 7,3, 6, 10, 13, 
16,20,16,20,3, 6, 10, 13, ié, 20, 9, 12, 1,5, 8, 11: 15, 18, a1, 15; a1, 5,8, il, 15, is. 21,14, 
17,3, 6, 10, 13,16,20,6,10, 3 6, 10, 13, ié, 20]; 

n=[1,1,1,1,1,1,2,2,3,3,3,3,3,3,34,4,5,5,5,5,5,5,5,6,6,7,7,7.7,7,7,8,8,9,9,9,9,9,... 
9,10,10,11,11,11,11,11,11,11,12,12,12,13,13,13,13,13,13,13,14,14,15,15,15,15,15,... 
15,16,16,17,17,17,17,17,17]; 

0o=[1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20,21,22,23,24,25,26,27,28,29,... 
30,31,32,33,34,35,36,37,38,39,40,41,42,43,44,45 46,47 ,48,49,50,51,52,53,54,55,... 
56,57,58,59,60,61,62,63,64,65,66,67 ,68,69,70,71,72,73,74,75]; 

1i=[9,15;18,24;43,49;50,52;53,59]; iii=[1,70;2,71;3,72;4,73;5,74;6, 75]; 

in2=[]; in3=[8,61]; 

c={[1,10,19,25,7];[2,11,20,26,28,19,10];[3,12,16,21,29,20,11]; [4,13,17,16,12];... 
(5,14,23,31,22,17,13];16,15,24,32,23,14,8];17,25,27,18,9];[16,17,22,30,21];... 
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(19, 28,36 ,44,35,27,25]; [20,29,37,41, 26] ; [21,30,38,42,46,37,29] ; [22,31,33,39,47,38,30];... 


(23 ,32,34,33,31] ; [26,41,45, 36,28] ; [33,34,40,48,39] ; [35,44,51,50,43];... 


[36 45,55 ,63,54,51,44] ; [37,46,56,64,55,45,41] ; [38,47,57,60,42] ; [39,48,58,61,66,57,47];... 


[40 ,49,52,59,67,58,48] ; [42,60,65,56,46] ; [50,51,54,62,53]; [55,64,69,68,63]}; 
cii={[18,27,35,43], [40,34,32]}; 
ciii={[2,10,1], [62,54,63,68];[2,11,3], [69,68]; [4,12,3] ,[69,64,56,65];... 
[5,13,4],[65,60,57,66];[5,14,8], [61,66]; [8,6], [67,58,61]}; 
civ={[1,7,91, [6], [67,59] , [62]}; 
% (18) 3_1[473]5_1[475]_1 
clear all; sz=27; nx=4; ny=8; dx=[0,1,2,3,4,5,6,7,8]; dy=[0,1,2,3,4]; 
dim1=max (dx); dim2=max (dy) ; 


g=[1,2;1,8;2,3;2,8;3,4;3,12;4,5;4,9;5,6;5,16;6,7;6,10;8,11;9,13;9,14;9,15;11,12;11,18;... 


12,13;12,23;13,14;13,19;14,15;14,19;15,16;15,19;16,17;16,25;18,21;18,22;19,24;20, 26]; 
m=[1,2,3,5, 15,91, 3, 4, 5,6, ts 52 aa 5, 9,1, Dy 3,5, 7, 8 91; 
; »2,2,3,3,3,3,3,3,3,4,4,4,5,5,5,5,5,5,5]; 


1 


38,9,1 
»1,1,2 
»6,7,8,9,10,11, 12, 13, 14, 15, 16, i7, 18, 19, 20, 21,22,23,24,25,26,27]; 
311,17; 

2,3,12,11,8];[13,4,9,13,12]; (4, ee 16, is, 9]; (5, 6, 10, 17, 16]; (6, 7,10];... 
19, 14,13];[9, 15, 14]; (11, 12, 23, 22, 18]; (12, 13, 19, 24, 231; (13, 14, 191; [14, 15,19];... 
[15,16,25,24,19];[16,17, 20, 26,25]; [18, 22,211}; cii={}; ciii={L6,71, [20]}; civ={}; 


4% (19) 3_1[473]5_1[475]_II 


7 
1 
5 
0 
sC 


clear all; eet: nx=8; ny=8; dx=[0,1,2,3,4]; dy=[0,1,2,3,4]; dimi=max(dx); dim2=max (dy) ; 


34,6;4,7;4,8;35,6;5,11;6,7;6,10;7,8;7,10;8,9;8,10;10,12]; 


q=[1,251, 
»3,1,3,5]; n=[1,1,1,2,3,3,3,3,3,4,5,5,5]; 


m=[1,3, 5 

9, 

9, 

iv={}; 

[378] _II 

nx=3; ny=2; i=sqrt(3)/2; 

»9,10,11,12,13,14,15,16]; 
»10,12,13,14,16,18,19,20,22,24,25,26,28,30,31,32,34,... 
246,48]; dimi=max(dx); dim2=max (dy) ; 

9;3,10;4,10;4,11;5,7;5,19;6,8;7,14;8,15;9,12;10,13;12,13;... 
»19;15,22;16,22;16,23;17,23;17,24;18,20;19,21;20,24;21,27;... 
22 ,25;23, »26;25,28;26,29;27,31;27, 34; 28, 34;28,35;29,35;29,36;30,32;... 
30,37;31,3 332,46;33,40;34,38;35,39;36,43;38,39;38,41;39,42;40,47;41,47;.. 
21.48,42.48.42.49,43,45,4350,44.46.45.49.45.58,46,50,47 51,48 52.49 55.50.56... 
51,52;51,53;52,54;53,59;53,60;54,60;54,61;55,57;55,62;56,58;56,63;57,61;57,73;... 
58,62;59,64;60,65;61,69;62, 70;64,65;64,67;65,68;67,74;68,74;68,75;69,72;69,76;... 
70,73;70,77;71,77;72,75;72, 85; 73,76; 74,78;75,81; 76,82;77,79; 78,80; 79,83 ;80, 86;... 
80,87 ;81,84;81,88;82,85;82, 89;83,89;83,90;84,87;84,100;85,88;86,91;87,95;88,96;... 
89 ,92;91,94;92,93;92,97;94,101;95,99;95,102;96,100;96,103;97,103;97,104;98,104;... 
99,101;100,102;101,107;102,108;103,105;104,106;105,106;105,109;106, 110] ; 

m=[3,7,11,15,2,6,1,5,9,13,17,9,13,1,5,9,13,17,4,16,3,7,11,15,7,11,3,7,... 
11,15,2,14,1,5,9,13,17,5,9,1,5,9,13,17,12,16,3,7,11,15,3,7,3,7,... 
11,15,10,14,1,5,9,13,17,1,5,17,1,5,9,13,17,8,12,3,7,11,15,3,15,3,... 
7,11,15,6,10,1,5,9,13,17,1,13,17,1,5,9,13,17,4,8,3,7,11,15,... 
11,15,3,7,11,15]; 

n=[1,1,1,1,2,2,3,3,3,3,3,4,4,5,5,5,5,5,6,6,7,7,7,7,8,8,9,... 
9,9,9,10,10,11,11,11,11,11,12,12,13,13,13,13,13,14,14,15,15,15,15,16,16,17,... 
17,17,17,18,18,19,19,19,19,19,20,20,20,21,21,21,21,21,22,22,23,23,23,23,24,24,... 


»8 
,8 
44 
:3, 
315 
325 


18,20; 2i 52713 iii= [i, 21; 2,223;3, 23; 4, 24; 5,25;6,26;7,27]; in2=[]; in3=[]; 


10,11,12,13]; ii1=[1,3;5,9;11,13]; iii=[1,11;2,12;3,13]; in2=[]; in3=[]; 
8,4];[4,7,6]; (4,8, ar [5,6 ,10,12,11]; [6,7,10];(7,8,10]; [8,9,13,12,10]}; 
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654 25,25,25,25,26,26,27,27,27,27,27,28,28,28,29,29,29,29,29,30,30,31,31,31, 
655 31,32,32,33,33,33,33]; 

656 o=[1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20,21,22,23,24,25,26,27, 
657 28,29,30,31,32,33,34,35, 36, 37, 38, 39, 40, 4i, 42, 43, 44, 45, 46, 47, 48, 49, 50, 51, 52, 


658 53,54,55,56,57,58,59,60,61,62,63,64,65,66,67,68,69,70,71,72,73,74,75,76,77, 

659 78.,79,80,81,82,83.,84,85,86,87,88,89,90,91,92,93,94.95.96,97,98.99,100,101,... 

660 102,103,104,105,106,107,108,109,110]; 

661 ii=[7,11;14,18;33,37;40,44;59,63;64,66;67,71;86,90;91,93;94,98] ; 

662 iii=[1,107;2,108;3,109;4,110]; in2=[31,20;78,79]; in3=[6,99]; 

663 c={[1,8,15,19,5];[2,9,12,16,22,15,8,6];[3,10,13,12,9]; [4,11,18,20,24,17,13,10];... 

664 [5,19,21,14,7]; [12,13,17, 23,16]; [15,22,25,28,34,27,21,19];[16,23,26,25,22];... 

665 [17,24,30,32,36,29, 26,23] ;[25,26,29,35,28] ; [27,34,38,41,47,40,33,31];... 

666 [28,35,39,38, 34]; [29,36,43,45,49,42,39,35] ; [30,37,44, 46,32] ; [32,46,50,43,36];... 

667 [38,39,42,48,41]; [41,48,52,51,47]; [42,49,55,57,61,54,52,48] ; [43,50,56,58,45];... 

668 [45,58,62,55,49]; [51,52,54,60,53]; [53,60,65,64,59] ;[54,61,69,72,75,68,65,60];... 

669 [55,62,70,73,57];[57,73,76,69,61] ; [64,65,68,74,67] ; [68,75,81,84,87,80,78,74];... 

670 §6©[69,76,82,85,72];[70,77,79,83,89,82,76,73] ; [72,85,88,81,75];... 

671 [80,87,95,99,101,94,91,86] ; [81,88,96,100,84] ; [82,89,92,97,103,96,88,85];... 

672 [83,90,93,92,89]; [84,100,102,95,87]; [92,93,98,104,97] ;[97,104,106,105,103]}; 

673 cii={[14,21,27,31] , [20]; [31,33] , (30,24, 20] ; [40,47,51,53,59], [56,50,46];... 

674 [67,74,78] ,(79,77]; [64], [71,77,70,62,58,56,63] ; [78, 80,86] , [83,79]}; 

675 ciii={[1,8,6], [99,101]; [2,6], [99,95,102];[2,9,3], [105,103,96,100,102];[3,10,4] ,[106,105]}; 
676 civ={[1,5,7], [4], [106,104,98], [101]}; 

677 % (21) 5_3[375]8_6[3°8]_III 

678 clear all; sz=110; nx=4; ny=2; i=sqrt(3)/2; 

679 dx=i*[0,1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16]; 

680 dy=0.5*(0,1,2,4,6,7,8,10,12,13,14,16,18,19,20,22,24,25,26,28,30,31,32,34,... 

681 36,37,38, se 42, mie 44,46,48]; diml=max(dx); dim2=max(dy) ; 

682 q=[i, 731, 832 32,933, 6; 3,10;4,10;4,11;5,8;6,9;6,20;7,12;8,13;9,17;10,18;12,13;... 

683 12,15; 13, 16; 15, 22; 16, 22;16, 23; 17, 23; 17, 24; 18,20;18,25;19,21;20,24;21,25;22,28;... 

684 23,26;24,27;25, 31; 26,27 ;26,29;27 30; 28.32;28.35;29.33;29.36;30.36;30.37;31,37;31,38;... 
685 32.34;33,35;33,47:34,39:35,43:36,44:37,40;39,42:40.41:40.45:42.49:43,49:43.50;44.47:... 
686 44,51;45,48;45,52;46,52;47,50;48,51;48,60;49,53;50,54;51,57;52,58;53,54;53,55;54,56;... 
687 55,59;55,62;56,62;56,63;57,63;57,64;58,60;58,65;59,61;59,73;60,64;61,68;62,69;63,66;... 
688 64,67;66,67;66, 70;67,71;68,75;69,73;69,76;70,74;70,77;71,77;71, 78; 72,78;73,75;74,76;... 
689 74,85;75,79;76,82;77,83;78,80;79,81;80,84;81,87;81,88;82,88;82,89;83,85;83,90;84,86;... 
690 84,91;85,89;86,90;86,100;87,94;88,92;89,93;90,97;92,93;92,95;93,96;94,101;95,99;... 

691 95,102;96,102;96,103;97,103;97,104;98,100;99,101;100,104;101,107;102,108;103,105;... 
692 104,106;105,106;105,109;106,110]; 

693 m=[(3,7,11,15,6,10,1,5,9,13,17,1,5,17,1,5,9,13,17,12,16,3,7,11,15,7,11,3,7,11,15,2,... 
694 6,1,5,9,13,17,1,13,17,1,5,9,13,17,8,12,3,7,11,15,3,7,3,7,11,15,2,14,1,5,9,13,17,9,... 
695 13,1,5,9,13,17,4,8,3,7,11,15,3,15,3,7,11,15,10,14,1,5,9,13,17,5,9,1,5,9,13,17,4,... 

696 16,3,7,11,15,11,15,3,7,11,15]; 

697 n=[1,1,1,1,2,2,3,3,3,3,3,4,4,4,5,5,5,5,5,6,6,7,7,7,7,8,8,9,9,9,9,10,10,11,11,11,... 

698 11,11,12,12,12,13,13,13,13,13,14,14,15,15,15,15,16,16,17,17,17,17,18,18,19,19,19... 

699 ,19,19,20,20,21,21,21,21,21,22,22,23,23,23,23,24,24,25,25,25,25,26,26,27,27,27,... 

700 27,27,28,28,29,29,29,29,29,30,30,31,31,31,31,32,32,33,33,33,33]; 

701 0o=[1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20,21,22,23,24,25,26,27,28,29,30,... 
702 31,32,33,34,35,36,37,38,39,40,41,42,43,44,45,46,47,48,49,50,51,52,53,54,55,56,57,58,... 
703 59,60,61,62,63,64,65,66,67,68,69,70,71,72,73,74,75,76,77,78, 79,80, 81,82 ,83,84,85,86,... 
704 87,88,89,90,91,92,93,94,95,96,97,98,99,100,101,102,103,104,105,106,107,108,109,110]; 
705 ii=(7,11;12,14;15,19;34,38;39,41;42,46;61,65;68,72;87,91;94,98]; 

706 ii1i=[1,107;2,108;3,109;4,110]; in2=[32,21;79,80]; in3=[5,99]; 

7o7 c={[1,8,13,12,7];[2,9,17,23,16,13,8,5];[3,10,18,20,6]; [6,20,24,17,9];... 

7os [12,13,16,22,15]; [16,23,26,29,33,35,28,22]; [17,24,27, 26,23]; [18,25,31,37,30,27,24,20];... 
709 [26,27,30,36, 29] ; [28,35,43,49,42,39,34,32] ; [29,36,44,47,33] ; [80,37,40,45,48,51,44,36];... 
710 «631,38, 41,40, 37] ; (33,47, 50,43,35] ; [40,41 ,46,52,45] ;[43,50,54,53,49];... 

711 ([44,51,57,63,56,54,50,47] ; [45,52,58,60,48] ; [48,60,64,57,51]; [53,54,56,62,55];... 

712 ([55,62,69,73,59] ; [56,63,66,70,74,76,69,62] ; [57,64,67,66,63] ; [58,65,72,78,71,67,64,60];... 
713 +=[59,73,75,68,61] ; [66,67,71,77,70]; [69,76,82,88,81,79,75,73];[70,77,83,85,74];... 

714 [71,78,80,84,86,90,83,77] ; [74,85,89,82,76] ; [81,88,92,95,99,101,94,87];... 

715 [82,89,93,92,88];[83,90,97,103,96,93,89,85] ;[84,91,98,100,86] ; [86,100,104,97,90];... 
716 [92,93,96,102,95];[97,104,106,105,103]}; 

717 cii={[15,22,28,32], [21]; [12], [19,21,25,18,10,4,11]; [82,34], [31,25,21];... 

718 [42,49,53,55,59,61], [58,52]; [68,75,79] , [80,78]; (79,81,87] , [84,80]}; 

719 ciii={[1,8,5], [99,101]; [5,2], [102,95,99];[2,9,6,3],[105,103,96,102]; [3,10,4] , [106,105]}; 
720 civ={[1,7], [4], [106,104,100,98] , [101]}; 

721 % (22) 5_2[375]12_12[3712] 

722 clear all; sz=34; nx=5; ny=3; i=sqrt(3)/2; dx=i*[0,1,2,3,4,5,6,7,8]; 

723 dy=([0,.5,1,3,3.5,4,5,6,6.5,7,9,9.5,10,11,12]; dimi=max(dx); dim2=max(dy) ; 

724 g=[1,3;1,6;2,4;2,6;3,5;3,11;4,7;4,12;5,8;6,9;8,13;9,11;9,12;10,14;11,13;12,14;... 


725 13,15;14,16;15,17;16,18;17,19;17,21;18,20;18,23;19,22;19,27;20,22;20,28;21,24;... 

726 22,25;24,27; 25, 29;25,30;26, 28; 27,29; 28,30; 29,31;30,32;31,32;31,33; 32 134]; 

727 m=[3,7,2,8,1,5,9,1,5,9,4,6,3,7, 3, 7 3,7,4,6,1,5,9,1,5,9,2, 8, 3,7, 3, 7,3 ear 

728 n=[1,1,2,2,3,3,3,4,4,4,5,5,6,6,7 °7,8.8,9,9,10,10,10,11,11,11,12,12,13,13,14,14,15,15]; 
729 Oa eos po per Os tata Oana 13,14,15,16,17,18,19,20,21,22,23,24,25,26,27,... 

730 28,29,30,31,32,33,34]; ii=[5,7; 8, 10; 21, 23; 24 5261; iii=([1,33;2,34]; in2=[15,16]; in3=[]; 
731 c= {f1,6,9,11,3];[2, 4,12, 9, or [3, 11, 13, 8,5];[4,7,10,14,12];... 


732 «(9,12,14,16,18, 20,22,19,17, 15,13, 11]; [17,19,27,24, 21] ; [18,23,26,28,20];... 
733 [19,22, 25,29, 27]; [20, 28,30, 25,22] ; [25,30,32,31, 291}; 

734 cii={[8,13,15], [16,14]; [15,17,21],[18,16]}; ciii={[1,6,2], [32,31]}; 

735 civ={[1,3,5],[4,2],[32,30,28,26] , [27,29,31]}; 


736 
737 
738 
739 
740 
741 
742 
743 
744 
745 
746 
TAT 
748 
749 
750 
751 
752 
753 
754 
755 
756 
757 
758 
759 
760 
761 
762 
763 
764 
765 
766 
767 
768 
769 
770 
771 
772 
773 
774 
775 
776 
777 
778 
779 
780 
781 
782 
783 
784 
785 
786 
787 
788 
789 
790 
791 
792 
793 
794 
795 
796 
797 
798 
799 
800 
801 
802 
803 
804 
805 
806 
807 
808 
809 
810 
811 
812 
813 
814 
815 
816 
817 


h (23) 


5_4[3°5]7_4[3°7] _II 
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clear all; sz=21; nx=3; ny=5; i=sqrt(3)/2; dx=i*[0,1,2,3,4,6,7,8,9,10,12]; 
dy=[0,.5,1,3,3.5,4,6]; diml=max(dx); dim2=max(dy) ; 
q=[1,4;1 632,532.73 3,8;3,9;4,7;4,14;5,8;6,10;7,11;8,12;10,14;11,16;11,17;12,15; 


12,17;1 
m=([3, 6,1 
n=[1,1,1 
0=[1,2,3 
ii=[6,9; 
c={[1,4, 


6; 15, 18; 16, 
8,11,1,5, 


3,18:1 
0,4,7, 
22,2,3 
»4,5,6 
10,13]; 
14,10,6] 


3,3,4,4,4, 
8.9.10, i1, 
iii=[1,19;2 


4,1 
1,5 
3, 
ot, 
3 i 


19; 17, 20; is, 211; 
8,11,2.9,3,6,10,3,6,10]; 
4,5,5,6,6,6,7,7,7]; 
12,13,14,15,16,17,18,19,20,21]; 
»20;3,21]; in2=[]; in3=[5,15]; 


3(2,5,8,12,17,11,7]; (3,9,13,18,15,12,8] ; [4,7,11,16,14]}; 


cii={}; ciii={[1,4,7,2],[17,11,16];[2,5],[15,12,17];[5,8,3],[18,15]}; 
civ={[1,6] ,(3], [18,13], [14,16]}; 
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iw) 
. 
ie) 
AS 
Lot 


4; 
1 
32 
Po) 
23 
»6 
31 
23 


PHREe viv 
VROMWH AN 


5,27,22, 19, 17]; 


Fy 


29:28,301; 
OTs 2,6,1,5,9,1,5,9,4,8,3,7,3,7]; 
6 


2,13,14,15,16,17,18,19,20,21,22,23,24,25 
iii=[1,29;2,30]; in2=[17,12]; in3=[4,25]; 


[16, 21, 24,26, 18]; [is, 26, 28,23 201}; 


cii={[8,13,15, 17], [12]; [17,19], [16, 14, 121}; 
ciii={[i,6,4] , [25,271; (4,21, [28, 23,251}; civ={[1,3,5], [2], [28,26,24] 


h (25) 


4_2[374]12_6[3712] 


clear all; sz=21; nx=10; ny=6; i=sqrt(3)/2; 
1,.5,1,1.5,144,2,1.5+1,2+1,2.5+1,2+2*i]; i=1/sqrt (3); j=sqrt(3)/6; 
d=sqrt (3)+1.5; dy=[0,1,i+],3*1,3*it1,d,d+i,d+itj ,d+3*i,d+3*i+1,2+d]; 


dx=[0,1- 


dimi=max 


(dx); dim2=max (dy ss 


2 

3,7, 

:7.7,8,8,9,9,9,10,10,10,11,11,12, 12,13, 
3,1 


116, 24; i7? 19; is, 20; 18, 26; ig? 122; 20. 23; 21, "2a; 22, S27: 23. 28; 


13]; 
,26,27,28,29,30]; 


1; [2° 7,10,12,14,9,6,4];[3,11,13,8,5];(9,14,16,18,20,15,13,11];... 


,[27]}; 


q=[1,2;1,63;2,3;2,5;3,7;5, ee 5,7;6,8;7,8;8,9;9,10;9,11;11,12;11,14;12,13;13,14; 
13,15; 14, 16; 15, 16; 16, 17; 17, 20; 17 521]; 
m=[1, 4,7, i1, 4,3,5, 4 ,4,2,6,9,9,8,10,9,9,1,4,7,11]; 


n=[1, 4/4 
o=[(1,2,3 
ii=[1,4; 
c={[1,2, 
cii={[10 
civ={[1, 
4 (26) 

clear al 
dx=[0,i, 
dy=[0,3, 
ee 3; 2, 


ii=[1,4; 


c={[2,6, 
(17,18, 


2, ,3,4,5, 6,6,6, 
5,6,7,8,9,10,11, 
21]; 

1;(2,3,7,5];05,7, 
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2 
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BROWN NNAAN ON Ns 
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NO O1ee ve OE WO OTB WOE We 


embed 


3 


7,8,8,9,10,11,11,11,11]; 
12,13,14,15,16,17,18,19,20,21]; 


8, 61; [11, 12, 13,14]; [13,15,16,14]}; 


5,13,12]}; ciii= {}; 
9,10], [12,11,9,8,7,3], [17], [18]; [3,2], [4], [17,16,15], [10,9,11,14,16,17,20]}; 
j 


=3; i= sqrt(3); j j=6/i; d=2*j+i; 
2#d-j,2*d-i, aed]; 


4, 6,8, 6, 5,7, 6, 6,5, 7, 6,4, 6, 8,1, 3; 9,11,1,11,2 


5,6,7,7,8,9,10, 10, 11, 12, 12, 12, 
ié, 17, 17]; 


iii=-[1, 18; 2, 19; 3,20;4 521]; in2= [10, 12;10,15]; in3=[]; 


13, 15,18,19,21,22,24,25, 28 ,30]; dimi=max(dx); dim2=max(dy) ; 
14,6;4.9;5,7:7,8;8, 11:9,10;9,13;11,12;11, 15;12,13;12,14;13,16;... 
316,17;17,18;18,19;18,20;19,21;19,22;20,21;20,24;21,23;22,23;... 

ie 5,29;26,31;27,28;27,32;29,31;30,32;31,33;32,34;33,35;34,36]; 


,10,1,11,1,11]; 


12, 13, 14, 15,16,17,18,19,20,21,22,23,24,... 


34, 35 36] ; 
0; 33, 34; 35,36]; iii=[1,35;2,36]; in2=(1; 


];[25,26,31, 29] ; (27,28, 30,321}; 
1, [34,32 ,27,24,23,22,26,31,33]}; civ={}; 


I 
4; ny=2; x=sqrt(3); dx=x*(0,1,2,3,4,5,6]; 


in3=(];W 


1; [i1, 12, 14, 15]: (12,13,16,14]; [14, 16,17,15];[18,20,21,19];... 

2 

11,15,17,18,19,22, 26,25], (27,24,20,18,17,16,13,9]; [29,31,33] , [32]}; 
9, 

7 


711,12,13,14,15,16,17,18]; dimi=max(dx) ; Severe (am 

55 8; 6,11;7, 9; 8,10;9, 12; 10,13;10,14;11,14;11,15;12,15; 
518; 17, 20; 18, 21; 20, 24; 21, 24; 241, 25; 22, 25; 22, 26; 23, 26; 
»29;28,30; 29.32;29,33: 30,33;30,34;31,34;31,35;32, 38; 


2,35; 38, 4i; 50, 53; 54, 56;57 ,60]; 
in2=[8, 1; in3= U1; 


1) 25, 28, a7, 24]; [22, 26, 31, 134, 30, 28, 25]; [27, 28, 30, 33, ie 


[29 33, 36,39,42,38, 32] ; [30,34,37,36,33] ;[31,35,41,44,40,37,34] ;[36,37,40,43,39];... 
[39,4345 ,48,51,47,42]; [40,44,46,45. 43] ;[45,46,49 52,48]; [49,53,56,55,52]}; 
cii={[1,5,8],(9,7];[8,10,13], [12,9]; [17], [23,26,22,15,12,16];... 
(20,24,27,29,32], [31,26] ; [38,42,47,50], [49,46,44]}; 
ciii={[1,5,2], [51,47,50,54];[2,6,3] ,[55,52,48,51] ;[3,7,4], [56,55]}; 


h (28) 


5_3[3°5]7_3[3°7] _II 


civ={}; 
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"40 ;38,42;39,42;39,43;40.43;40,44;41.44;42.47;43.45; ... 
*50;47,51;48 51;48,52;49,52;49,53;50,54;... 

5591; 

1,3,5,7,1,3,7,1,3,5,7,2,4,6,2,4,2,4,6,1,3,5,7,3,... 
1,3,5,7,1,5,7,1,3,5,7]; 
5,5,5,5,6,6,6,7,7,7,7,8,8,8,9,9,10,10,10,11,11,11, 
14,15,15,16,16,16,17,17,17,17,18, 18,18, 19,19, 19, 19]; 
12,13,14,15,16,17,18,19,20,21,22,23,24,25,26,27,28,29,30, 
,40,41,42,43,44,45,46,47,48,49,50,51,52,53,54,55,56,57,58,59, 60]; 
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clear all; sz=32; nx=5; ny=3; nx=3; ny=2; x=sqrt(3)/2; dx=[0,2,3,4,6,7,8]; 

dy=0.5*(0,2,4,5,6,10,11,12,14,16,17,18,22,23,24]; diml=max(dx); dim2=max(dy) ; 

g=[1,4;2,8;4,5;4,7;5,10;7,11;8,10;8,12;9,12;10,11;11,13;12,14;13,16;13,17;14,15; 
14,17;15,18;15,20;16,21;17,19;19,20;19,22;20, 24; 21,25;22,25;22,26;23,24;24, 26; 


25 ,27;26,28;27,29;27, 30; 28,31;28,32; 29,31]; 
m=(1,4,7,1,2,7,1,4,7,3,2,5,2,5,6,1,4,7,4,5,1,4,7,6,2,5,2,5,3,1,4,7]; 
n=[1,1,1,2,2,2,3,3,3,4,5,5,6,6,7,8,8,8,9,9, 10, io, 10, i1; 12, 12, 13, 13, 14,15,15,15]; 
o=[1,2,3,4,5,6,7,8,9,10, it, 12, 13, 14, is, 16, 17, 18, 19, 20, aie 22, 23, 24, 25, 26, 27, 28, 29,30,31,32]; 
11=L1,3;4,6;7,9;16,18;21, 23; 30 ,32]; iii= [1, 30; 2,31;3, 32]; in2= O; in3= [5, 291; 
c={[4,5,10,11,7]; (8,12, 14, 17, 13, 11,10]; (13,17, 19, 22, 25, 21,16]; [14,15,20,19,17];... 

[15,18,23,24, 201; [19, 20, 24, 26, 221; [22,26 ,28, Si. 29, 27, 251}; 
cii={[7,11,13,16] , [15.14.12]; [21,25,27,30] ,[28,26,24]}; 
ciii={[1,4,5], [29,27]; [2,8,10,5] , [29]; [2,8,12,9,6,3],[28]}; civ={[1],(],[28,26,24,23] ,[25,27]}; 
4 (29) 3_2[4°3]5_2[475]_1 


clear all; sz=15; nx=6; ny=6; dx=[0,1,2,3,4]; dy=[0,1,2,3,4]; dimi=max(dx); dim2=max (dy) ; 
q=[1,2;1 Re aa 5;5,7;5,8;6,7;6, PaO artad a tar erste per ea 

m=[1,3 (4.5 »3,1,2,3,5,1,5,1,3,4 .51; n=[1,1 21,1,2,3,3,3,3,4,4,5,5,5,5]; 
o=[1,2,3,4,5,6,7,8,9,10,11, 12, 13,14,15]; 4i=[1,4;6,9;10,11;12,15]; 1i1i1=[1,12;2,13;3,14;4,15]; 
in2= 0; in3=[]; 
c={[1,2,5,7,6];(2,3,5];(3,4,9,8,5];(5,8,7];(6,7,10];(7,8,13,12,10]; [8,9,11,14,13]}; 

cii={}; ciii={}; civ={[1],[3], [11], 0}; 

% (30) 3_2[473]5_2[475]_II 


clear all; sz=41; nx=3; ny=3; dx=[0,1,2,3,4,5,6,7,8]; dy=[0,1,2,3,4,5,6,7,8]; 
dimi1=max (dx); dim2=max (dy) ; 
SPREE Cer Poe STE HTL Pint FR Ea Cae ey ey eee ee 


11,16;12,13;12,22;13,14;13,17;14,17;14,18;15,16;15,20;16,20;16,21;17,18;17, 23; 
18.19;18.27;20,21;21.22;21.29;22.23;22.25;23,25;23,26;24,28;25,26;25,30;26.27;26,35; 
27 ,28;27,31;28,31;28,32;29,30;29 "33; 30,33; 30,34; 31,32; 31,36;32,40;33,34;33, 37 ;34,35; 
35.36; 35 ,38; 36, 38:36, 39]; 
m=[1,5,6,8,9,1,3,4,8,9,3,4,6,7,1,2,6,7,9,1,2,4,5,9,4,5,7,8,2,3,7,8,2,3,5,6,1,5,6,8,9]; 
a eee LET TEE TRO ee 9 a8 ; 
o=[1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20,21,22,23,24,25,26,27,28,. 
29 ,30,31,32,33,34,35,36,37,38,39,40,41]; 
ii=[1,5;6,10;15,19;20,24;37,41]; iii=[1,37;2,38;3,39;4,40;5,41]; in2=[29,32]; in3=[7,34]; 
c={[2.3,13,12,81;(3,4.9, 14,13] ;[4,5,91;(5,10,91;[6,7,11,16, 15];(7,8,11];(8,12,11];... 
[9,10,19,18, 14] ;[11, 12.22.21, 16]; [12,13,17,23, 22]; [13,14,17]; (14, 18, 171; [15,16,20];... 
[16,21, 20] ; [17,18, 27, 26, 23] ; [18,19, 24, 28,27] ; [21,22, 25,30, 29] ; [22,23, 25]; [23,26,251;... 
[25 ,26,35,34,30]; [26,27,31, 36,35] ; (27, 28,31] ; [28,32,31]; (29,30,33]; [30,34,33];... 
[31,32,40,39, 36]; [35,36,38] ; [36,39,38]}; 
cii={[20, 21,29], [32,28]; [29,33,37],[40,32]}; ciii={[1,6,7], [34,33]; [7,8,2],(35,34]}; civ={}; 
% (31) 3_3[473]5_3[475] 


clear all; sz=9; nx=6; ny=7; dx=[0,2,3,4,6]; dy=[0,2.5,5]; diml=max(dx); dim2=max(dy) ; 


q=[1,2;1,632,3;2,533,4;3,5;5,7;5,8]; m=[1,2,4,5,3,1,2,4,5]; n=[1,1,1,1,2,3,3,3,3]; 
o=[1,2,3,4,5,6,7,8,9]; ii=[1,4;6,9]; iii=[2,7;3,8;4,9]; in2=[]; in3=[]; 
c={[1,2,5,7,6];[2,3,5];(5,8,7]}; cii={[1,6],[8,5,3]}; ciii={}; civ={}; 
% (32) 3_1[473]6_2[476]_I 
clear all; sz=21; nx=3; ny=3; dx=[0,2,3,5,7,8,10]; 
dy=[0,2,3,5,7,8,10]; dimi=max(dx); dim2=max (dy) ; 
=[1,2;1,7;2,332,7;3,4;3,6;4,5;4,8;6,10;6,11; g, 12;7,9;9,10;9,15;10,11;10,14;11,12; 
11,14;12,13;12,14;14,19;15,17; 75 18; 16, 20] ; 
m=[1,3,4,5,7,4,1,7,1,2,4,6,7,4,1, 7. 1,3, 4, 5,7]; n=[1,1,1,1,1,2,3,3,4,4,4,4,4,6,5,5,7,7,7,7,71; 
o=[1,2,3,4,5,6,7,8,9,10,11,12,13, 14, is, 16, 17,18,19,20, 211; ii= [1, 5; Ts 8; 9, 13; 15, 16; 17 ,211; 
1ii=[1,17;2,18;3,19;4,20;5,21]; in2=(]; in3= O; 
c={[1,2,7];[2,3,6,10,9,7]; [3,4,8,13,12,6];[4,5.8];[6,11,10];[6,12,11];[9,10,14,19,18,15];... 
[(10,11,14];[11,12,14]; [12,13,16,20,19,14];[15,18,17]}; cii={[15,17],[20]}; ciii={}; civ={}; 
% (33) 3_1[4°3]6_2[476]_II 
clear all; sz=12; nx=6; ny=7; dx=[0,1,3,5,6]; dy=[0,2,3,5]; diml=max(dx); dim2=max(dy) ; 
g=[1,2;1,8;2,3;2,6;3,4;3,6;4,5;4,6;6,7;7,9;7,10;7,11]; m=[1,2,3,4,5,3,3,1,2,3,4,5]; 
n=[1,1,1,1,1,2,3,4,4,4,4,4]; 0=[1,2,3,4,5,6,7,8,9,10,11,12]; ii=[1,5;8,12]; 
iii=[1,8;2,9;3,10;4, 11;5,121; in2=[]; in3=(]; 
c={[1,2,6,7,9,8];(2,3,6];[3,4,6];([7,10,9];(7,11,10]}; cii={[1,8],[11,7,6,4]}; ciii={}; civ={}; 
% (34) 3_2[473]6_4[4°6] 
clear all; sz=7; nx=10; ny=7; dx=[0,1,2,4]; dy=[0,3,6]; dim1=max(dx) ; paacureg ane 
q=[1,2;1,6;2,3;2,4;4,5;4,6]; m=[1,3,4,2,1,3,4]; n=[1, 1,1,2,3,3,3]; o=[1,2,3,4,5,6,7]; 
ii=(5,7;1,3); iii=[1,5;2,6;3,7]; ind= 0: in3= (]; c= {[1, 2 °4]; [4, 5,6]}; 
cii={[1,4,5],[6,4,2]1}; ciii={}; civ={}; 
4% (35) 3_3[4°3]6_6[476] 
clear all; sz=11; nx=8; ny=5; dx=[0,1,2,3,4]; y=sqrt(3); dy=y*[0,1,2,3,4]; diml=max(dx) ; 
dim2=max(dy); q=[1,2;2,3 
m=[1,3,5,4,1,3,5,2,1,3,5]; n=[1,1,1,2,3,3,3,4,5,5,5]; o=[1,2,3,4,5,6,7,8,9,10,11]; 
i 


1i=[1,3;5,7;9,11]; iii=[1 
cii={[1,2,4,6,5],[4]; [5,8 
% (36) 3_1[4°3]8_4[478] 

clear all; sz=12; nx=7; ny=7; dx=[0,2,3,5]; dy=[0,2,3,5]; dimi=max(dx); dim2=max(dy) ; 
q=[1,231,552,3;2,5;3,4;3,6;5,7;7,93;7,10;8,11]; m=[1,2,3,4,1,4,1,4,1,2,3,4]; 
n=[1,1,1,1,2,2,3,3,4,4,4,4]; 0=[1,2,3,4,5,6,7,8,9,10,11,12]; ii=[1,4;5,6;7,8;9,12]; 
iii=([1,9;2,10;3,11;4,12]; in2=[]; in3=[]; c={[1,2,5];[2,3,6,8,11,10,7,5];[3,4,6];[7,10,9]}; 
cii={[7,9],[11]}; ciii={}; civ={}; 

% (37) 3_1[5°3]4_2[574]_I 

clear all; sz=8; nx=16; ny=4; dx=[0,1,2]; y=sqrt(3); dy=[0,2,y+2,y+4,2*y+4]; diml=max(dx) ; 
dim2=max(dy); q=[1,2;1,3;3,4;3,5;4,5;5,6;6,7;6,8]; m=[1,3,1,3,2,2,1,3]; n=[1,1,2,2,3,4,5,5]; 
0=[1,2,3,4,5,6,7,8]; ii=[1,2;3,4;7,8]; iii=[1,7;2,8]; in2=[5,5;6,6]; in3=0); 


9;2,10;3,11]; in2=[]; in3=[]; c={[2,3,4];[4,7,6];(5,6,8]; [8,10,9]}; 


32,433,4;4,634,7;5,6;5,8;6,7;6,8;8,9;8,10]; 
39], [10,8;6]}; ciii={}; civ={}; 
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c={[1,2,4,3];(3,4,5];(6,8,7]}; cii={(3,5,6,7],16,5]}; ciii={}; civ={}; 

% (38) 3_1[573]4_2[674] 

clear all; sz=25; nx=3; ny=3; dx=[0,1,2,3,4]; dy=[0,1,2,3,4]; diml=max(dx); dim2=max (dy) ; 

g=[1,2;1,6;2,3;2,6;2,7;3,433,73;3,8;4,5;4,9;6,7;6,11;7,8;7,12;8,9;8,12;8,13;9,10;9,13;... 
9,14;11,12;11,16;12,13;12,17;13,14;13,18;14,15;14,18;14,19;15,19;16,17;16,21;17,18;... 
17,21;17,22;18,19;18,23;19,20;19,24;20,24]; 

m=[1,2,3,4, »5,1,2,3,4,5,1,2,3,4,5,1,2,3,4,5]; 

n=[1,1,1,1, »2,3,3,3,3,3,4,4,4,4,4,5,5,5,5,5]; 

o=[1,2,3,4, »10,11,12,13,14,15,16,17,18,19,20,21,22,23,24,25]; 

ii=[1,5;6,1 6,20;21,25]; iii=[1,21;2,22;3,23;4,24;5,25]; in2=[]; in3=[]; 


5,1,2,3,4 
1,2,2,2,2 
5,6,7,8,9 
0;11, 1 


2 
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c={[1,2,6] ;[2,7,6]; [2,3,7];(3,8,7]; [3,4,9,8];[4,5,10,9];[6,7,12,11]; [7,8,12];[8,13,12];... 


(8,9,13];[9,14,13];[9,10,15,14]; [11,12,17,16]; [12,13,18,17];[13,14,18];[14,19,18];... 
[14,15,19] ;[15,20,19]; (16,17, 21]; (17,22, 21] ; [17,18,23,22]; [18,19,24,23];[19,20,24]}; 
cii={[16,21],[24]}; ciii={}; civ={}; 
4 (39) 3_2[5°3]4_4[574] 
clear all; sz=12; nx=4; ny=4; t=37#pi/180; y=cos(t/2)/tan(t/2) ; 
dx=(0,1,2,y+1l,y+2,y+3,2*y+2]; dy=[0,1,y,yt1,yt+2,2*y+1,2*y+2]; dimi=max(dx); dim2=max (dy) ; 
q=[1,2;1,53;2,4;2,53;3,4;4,6;4,7;5,6;5,8;6,7;6,83;6,9;7,9;8,10;8,11;9,11;9,12]; 
m=[1,3,7,5,2,4,6,2,5,1,3,7]; n=[1,1,1,2,3,4,4,5,6,7,7,7]; 0=[1,2,3,4,5,6,7,8,9,10,11,12]; 
1i1=[1,3;10,12]; iii=[1,10;2,11;3,12]; in2=[5,7;8,7]; in3=[4,9]; 
c={[1,2,5];(2,4,6,5];[4,7,6];[5,6,8];(6,7,9];[6,9,11,8]}; 
cii={[1,5],(7,41;(5,8],(7];(8,10],(9,7];(8,11],[12]}; ciii={[2,4],(9];[4,3],[9]}; civ={}; 


§ A.7 Covering lattices 


aANIawrhrwnNe 


%, cover contour 
clear all; St=sum(100*clock); rand(’state’,St); CaN=100; X=rand (CaN, 2); 
[Va,Ca]=voronoin(X); VaN=size(Va,1); Vin=sparse(VaN,1); 
for i=1:VaN, 
if ((Va(i,1)<=1) & (Wa(i,1)>=0) & (Wa(i,2)<=1) & (Va(i,2)>=0)) 
Vin(i,1)=1; 
end 
end 
CO=[]; Xn=[]; count=0; 
for i=1:CaN, 
TmpN=size(Ca{i},2); Tmp=1; 
for j=1:TmpN, 
if (Vin (Cafi} (1,5) ,1)) 
Tmp=0; break; 
end 
end 
if (Tmp) 
count=count+1; CO{count,1}=TmpN; CO{count,2}=Ca{i}; Xn=[Xn;i]; 
end 
end 
CN=size(CO,1); Ci=(1; 
for i=1:CN, 
Tmp=[CO{i,2},CO{i,2}(1,1)]; 
for j=1:CO{i,1}, 
C1{i,j}(1,1)=(Va(Tmp (1,5) ,1)+Va(Tmp(1, (j+1)) ,1)) /2; 
Ghee yaa inp hee eae le ieee 
en 
end 
C{i}=C1; figure(1); clf; hold on; 
for i=1:CN, 
x=[]; y=(1; 
for j=1:CcOf{i,1}, 
x=[x,C{1}{i,j}(1,1)]; y=Ly,cf{i}{i,j}(1,2)]; 
end 
x=[x,x(1,1)]; y=[y,y(1,1)]; plot(x,y); 
end 
axis equal; 
n=8; 
for k=2:n, 
Cn=(]; 
for i=1:CN, 
TmpX=[]; TmpY=[]; 
for j=1:CO{i,1}, 
TmpX=(TmpX,C{k-1}{i,j}(1,1)]; TmpY=[TmpY, C{k-1}{i, j}(1,2)]; 
end 
TmpX=([TmpX,TmpX(1,1)]; TmpY=[TmpY,TmpY(1,1)]; 
for j=1:CO{i,1}, 
Cn{i,j}(1,1)=(TmpX(1, j)+TmpX(1, (j+1)))/2; 
Cn{i,j}(1,2)=(TmpY(1, j)+TmpY (1, (j+1)))/2; 
end 
end 
C{k}=Cn; 
end 
figure(2); clf; hold on; 
for i=1:CN, 


276 Ph.D. Thesis, UMIST. K N Tiyapan. Appendix A: Programs 


x=[]; y=01; 
for j=1:CO{i,1}, 
x=[x,C{n}{i,j}(1,1)]; y=[y,.C{n}{i,j}(1,2)]; 
end 
x=[x,x(1,1)]; y=L[y,y(1,1)]; plot(x,y); 
end 
axis equal; DEVV=sparse (VaN,VaN) ; 
DVO=[] ; 
for i=1:CN, 
TmpN=CO{i,1}; Tmp=(CO{i,2},cO{i,2}(1,1)]; 
for j=1:TmpN, 
Vi=Tmp(1,j); V2=Tmp(1, (j+1)); 
if (“DEVV(V1,V2)) 
dx=Va(V2,1)-Va(V1,1); dy=Va(V2,2)-Va(V1,2); 
TmpA=sqrt (dx*dx + dy*dy); DEVV(V1,V2)=TmpA; DEVV(V2,V1)=TmpA; 
end 
DVO{i,1}{1,1}(1,j)=DEVV(V1,V2); dx=Va(V1,1)-X(Xn(i,1),1); 
dy=Va(V1,2)-X(Xn(i,1),2); TmpA=sqrt (dx*dx + dy*dy); DVO{i,1}{2,1}(1, j)=TmpA; 
end 
end 
AO=(]; 
for i=1:CN, 
TmpN=CO{i,1}; Tmp=[DVO{i,1}{2,1},DVO{i,1}{2,1}(1,1)]; At=0; 
for j=1:TmpN, 
a=DVO{i,1}{1,1}(1,j); b=Tmp(1,j); c=Tmp(1,(j+1)); s=(atbtc)/2; 
Ai=sqrt (s*(s-a) *(s-b)*(s-c)); At=AttAi; 
end 
AO=[AO; At]; 
end 
DV=[]; A=(]; 
for i=1:n, 
TmpA=[]; 
for j=1:CN, 
TmpN=CO{j,1}; TmpB=[]; 
for k=1:TmpN, 
TmpB=([TmpB;C{i}{j,k}]; 
end 
TmpB=([TmpB ; TmpB(1,:)]; 
for k=1:TmpN, 
x1=TmpB(k,1); yl=TmpB(k,2); x2=TmpB((kt1),1); y2=TmpB((kt1) ,2); 
dx=x2-x1; dy=y2-y1; TmpA{j,1}(1,k)=sqrt (dx*dx + dy*dy); 
dx=x1-X(Xn(j,1),1); dy=yi-X(Xn(j,1),2); TmpA{j,2}(1,k)=sqrt (dx*dxtdy*dy) ; 
end 
end 
DV{i}=TmpA; TmpA=[]; 
for j=1:CN, 
TmpN=CO{j,1}; TmpB=(DV{i}{j.2},DV{i}{j,2}(1,1)]; At=0; 
for k=1:TmpN, 
a=DV{i}{j,1}(1,k); b=TmpB(1,k); c=TmpB(1, (kt1)); s=(atbt+c)/2; 
Ai=sqrt (s*(s-a)*(s-b)*(s-c)); At=At+Ai; 
end 
TmpA=[TmpA; At] ; 
end 
A{i}=TmpA; 
end 
p=[sum(A0)] ; 
for i=1:n, 


p=[p,sum(A{i})]; 
end 
p=p*100/p(1); figure(3); clf; plot(O:n,p); 
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§ A.8 Covering contour 


Pee 
WNFODAN OAR WNEH 


14 


4 gxy.m, cover contour (c) 2002, Kit Tiyapan@UMIST 
clear all; St=sum(100*clock); rand(’state’,St); CaN=120; 
X=rand(CaN,2); [Va,Ca]=voronoin(X); VaN=size(Va,1); Vin=sparse(VaN,1); 
for i=1:VaN, 
if ((Va(i,1)<=1) & (Wa(i,1)>=0) & (Wa(i,2)<=1) & (Va(i,2)>=0)) 
Vin(i,1)=1; 
end 
end 
CO=[]; Xn=[]; count=0; 
for i=1:CaN, 
TmpN=size(Ca{i},2); Tmp=1; 
for j=1:TmpN, 
if (“Vin (Ca{i}(1,j),1)) 
Tmp=0; break; 
end 
end 
if (Tmp) 
count=count+1; CO{count,1}=TmpN; CO{count,2}=Ca{i}; Xn=[Xn;i]; 
end 
end 
CN=size(CO,1); Ci=(1; 
for i=1:CN, 
Tmp=[CO{i, 2},CO{i,2}(1,1)]; 
for j=1:CcOf{i,1}, 
C1{i,j}(1,1)=(Va(Tmp (1,5) ,1)+Va(Tmp(1, (j+1)) ,1)) /2; 
a eer eh dee »2)+Va(Tmp(1, (j+1)) ,2))/2; 
en 
end 


C{1}=C1; 


n=8; 
for k=2:n, 
Cn=[]; 
for i=1:CN, 
TmpX=[]; TmpY=[]; 
for j=1:CO{i,1}, 
TmpX=[TmpX ,C{k-1} {i,j} (1,1)]; TmpY=[TmpY, C{k-1} {i,j} (1,2)]; 
end 
TmpX=[TmpX,TmpX(1,1)]; TmpY=[TmpY,TmpY(1,1)]; 
for j=1:CO{i,1}, 
Cn{i,j}(1,1)=(Tmpx(1, j)+TmpX(1, (j+1)))/2; 
Cn{i,j}(1,2)=(TmpY(1, j)+TmpY (1, (j+1)))/2; 
end 
end 
C{k}=Cn; 
end 


§ A.9 Number of vertices 


NEP RP RP eB RP eB Ree 
SCOANADORWNRFOTODANAARWHNHEH 


i eS) 
Ne 


%, numofvertices.m 
clear all; dimmin=2; dimmax=9; batches=5; dvn=[]; cpu=[]; 
nmax=1000; rand(’state’ ,sum(100*clock)); 
for i=dimmin:dimmax, 
for j=1:batches, 
n=round(nmax/i); x=rand(n,i); t=cputime; [v,c]=voronoin(x) ; 
cpu(i,j)=(cputime-t)/n; lend=*floor(v); hend=*(ceil(v)-ones(size(v))); 
lhend=lend & hend; in=min(lhend,[],2); dvn(i,j)=sum(in) /n; 
end 
end 
dvn=[((1:dimmax)’ ,dvn]; dvn=dvn(2:dimmax,:); figure(1); clf; 
for i=1:batches, 
semilogy(dvn(:,1),dvn(:,(it1)),’.’,’LineWidth’,2); hold on; 
end 
edvn=[dvn(: ,1) ,sum(dvn(: ,2: (batchest1)) ,2)/batches]; tmp=edvn(: ,2)./exp(edvn(:,1)); 
A=sum(tmp) /(dimmax-1); m=[dimmin,dimmax]; semilogy (m, Atexp(m)); 
cpu=[(1:dimmax)’,cpu]; cpu=cpu(2:dimmax,:); figure(2); clf; 
for i=1:batches, 
semilogy(cpu(:,1),cpu(:,(it1)),’.’,’LineWidth’,2); hold on; 
end 
ecpu=[cpu(: ,1) ,sum(cpu(: ,2: (batchest1)) ,2)/batches]; tmp=ecpu(:,2)./exp(ecpu(:,1)); 
B=sum(tmp) /(dimmax-1); m=[dimmin,dimmax]; semilogy (m, (B/35)*(exp(1)+2) .7m); 
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§ A.10 Vertices per cell and cell ratio 


1 % numveachcell.m 

2 clear all; dimmin=2; dimmax=6; batches=5; nmax=3000; 

3 rand(’state’,sum(100#clock)) ; 

4 for i=dimmin:dimmax, 

5 for j=1:batches, 

6 n=round (nmax*2/i); x=rand(n,i); [v,c]=voronoin(x) ; 

7 fleet{i,j,i}=v; fleet{i,j,2}=c; fleet{i,j,3}=n; 

8 end 

9 end 

10 for i=dimmin:dimmax, 

11 for j=i:batches, 

12 v=fleet{i,j,1}; c=fleet{i,j,2}; n=fleet{i,j,3}; lend=*floor(v); 
13 hend=~ (ceil (v)-ones(size(v))); lhend=lend & hend; in=min(lhend, [] ,2); 
14 numvc=[]; vcin=[]; 

15 for p=i:n, 

16 numvc=[numvc,size(c{p},2)]; flag=1; 

17 for q=1:numvc(p) , 

18 if (~in(c{p}(q))) 

19 flag=0; break; 

20 end 

21 end 

22 if (flag) 

23 vein=[vcin,numvc(p)]; 

24 end 

25 end 

26 tmpn=size(vcin,2); rcin(i,j)=tmpn/n; vec(i,j)=sum(vcin) /tmpn; 
27 end 

28 end 

29 dum=rcin; str={’c_{in} / c_{all}’}; dum=dum(2:dimmax,:); tmp=[]; 

30 for i=dimmin:dimmax, 

31 tmp=([tmp;i*ones(batches,1),dum((i-1),:)7]; 

32 end 

33 figure(1); semilogy(tmp(:,1),tmp(:,2),’.’,’LineWidth’,2); hold on; 
34 [p,s,mu]=polyfit (tmp(:,1),tmp(:,2),4); x=(dimmin: .02:dimmax)’; 

35 y=polyval(p,x,[],mu); semilogy(x,y); dum=vec; dum=dum(2:dimmax,:); tmp=[]; 
36 for i=dimmin:dimmax, 

37 tmp= (tmp; i*ones (batches ,1) ,dum((i-1) ,dimmin: dimmax) ’]; 

38 end 

39 figure(2); semilogy(tmp(:,1),tmp(:,2),’.’,’LineWidth’,2); hold on; 
40 edum=[dum(: ,1) ,sum(dum(: ,2: (batches+1)) ,2)/batches]; 

41 tmp=edum(: ,2)./exp(edum(:,1)); A=sum(tmp)/(dimmax-1); m=[dimmin,dimmax] ; 
42 semilogy(m, (A/70)*(exp(1)+4).*m); xlabel(’Dimension’ ,’FontSize’ ,14); 
43 ylabel(str,’FontSize’ ,14) ; 
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§ A.11 TRX’s macros 


COonNnoahlwnre 


¥, thshead. tex 
¥, thshead. tex 
\def \Ordinate{\ifnum\day>30 1 \else\ifnum\day>20 \day-20 \else\day\fi\fi} 
\def \date{{\number\day\/{\ifcase\Ordinate\or $"{st}$\or $"{nd}$\or $"{rd}$ \else $7{th}$\fi}} 
{\ifcase\month\or January\or February\or March\or April\or May\or June\or July\or August\or 
September\or October\or November\else December\fi}, {\number\year}} 
\def \dat [#1:#2:#3]{\begingroup\tmp=#1 \ifnum\tmp>30 \tmp=1 \else\ifnum\tmp>20 
\advance\tmp-20 \fi\fi 
{#1\/{\ifcase\tmp\or $*{st}$\or $*{nd}$\or $*{rd}$ \else $*{th}$\fi}} #2 #3 
\endgroup} 
\input manmac 
4 \tracingall 
4 \proofmodefalse 
\if proofmode\else\overfullrule=0pt\fi 
\hsize=6in \vsize=9.70820393249937in \maxdepth=2pt \parindent=2pc 
\pagewidth=\hsize \pageheight=\vsize \font\titlefont=cmbx10 at 15pt 
\font\inchhigh=cminch at 20pt 
\input epsf 
\input rotate 
\input ukhyphen 
\def \home {/home/mjkpjkt2} 
\def \dry#1{\ifcase#1\or 
\home/ar/thesi\or \home/ts\or \home/tiyapan/Extremum/DsgnExReport\or 
\home/xfg\or \home/ths\or \home/tiyapan/Perco/Papers\or \home/tiyapan/Extremum/Matlab\or 
\home/ar/rci\or \home/ar/trans\or \home/ar/wn21\or 
\home/ar/wn23\or \home/ar/wn7\or \home/phy\or \home/rds\or \home/obj\or 
\home/voy\or \home/cum\or \home/flt\or \home/pcl\or \home/stp\fi} 
\def \o [#1:#2]{$#17{\hbox{\sevenrm #2}}$} 
\def\Title{Ph.D. Thesis, UMIST. K N Tiyapan.} 
\font\tenbm=cmmibi0 \font\ninett=cmtt9 \font\sixit=cmtié6 \font\twelvebf=cmbx12 
\font\twelverm=cmri2 \def\[#1]{{\it #1}} \def\(#1) {{\bf #1}} 
\def \r [#1] {{\rm #1}} \def\s[#1]{{\sl #1}} 
\def \beginsection#1\par{\vskip\z@ plus.3\vsize\penalty-250 
\velkipved plus-.3\vsize\bigskip\vskip\parskip 
\neesnga{#i}\leftlinal\beel} \acbrask\ anal lexi p\nédndene) 
\def \ifundef ined#1{\expandafter\ifx\csname#1\endcsname \relax} 
\def \ix [#1] (#2) {\expandafter\def \csname#1 \endcsname {#2}} 
\def \x [#1] {\ifundefined{#1}\ix [#1] ($\aleph$) \fi \csname#i\endcsname} 
\def \ipno [#1] {\ifundefined{#1p}\ix [#1p] (1) \fi} 
\def \pno [#1] {\immediate\write\ref{\string\ix [#1p] (\number\pageno) }} 
\input ref 
\newwrite\ref \immediate\openout \ref=ref 
\newdimen\dtmp \newdimen\dtmpi \newdimen\dtmpii \newcount\tmp 
\def\Bf#1:{{\bf #1}} \def\ct{\hfil\par} \def\cut{\par\vfill\break} 
\def \der [#1] {{\bf #1},} \def\hd#1:{\hfil{\twelvebf #1}\hfil} 
\def \It#1:{{\it#1}} \def\pc{\hbox{Pc}} 
\def \S1#1: {{\sl1#1}} 
\def \w#i: {\dtmpi=\hsize \advance\dtmpi-.3em \dtmpii=\dtmpi \advance\dtmpii-.3em 
\parshape=2 Opt \dtmpi .3em \dtmpii {\tenpoint\bf #1.~}} 
\def \vws [#1]#2:#3:{{\bf #1} ({\sl #2} in {\sl #3})} % explain vowel sounds 
\def \Lift#1#2{\raise#1iem\hbox{#2}} 
\def \beginindex{\begingrou 
\parindent=lem \maudesth=\marditian 
\def\par{\endgraf \futurelet\next\inxentry} 
\obeylines \everypar={\hangindent 2\parindent} 
\exhyphenpenalty=10000 \raggedright} 
\def \inxentry{\ifx\next\sub \let\next=\subentry 
\else\ifx\next\endindex \let\next=\vfill 
\else\let\next=\mainentry \fi\fi \next} 
\def \endindex{\mark{}\break\endgroup} 
\let\sub=\indent \newtoks\maintoks \newtoks\subtoks 
\def \mainentry#1, {\mark{}\noindent 
\maintoks={#1}\mark{\the\maintoks}#1,} 
\def \subentry\sub#1, {\mark{\the\maintoks}\indent 
\subtoks={#1}\mark{\the\maintoks\sub\the\subtoks}#1,} 
\def \boxit#1{\vbox{\hrule\hbox{\vrule\kern3pt 
\vbox{\kern3pt#1\kern3pt }\kern3pt \vrule}\hrule}} 
\def \bxt <#1>{\vbox{\hrule\hbox{\vrule\kern. 7pt 
Nebort \kera-7pttl \kern (?pt} earn. 7pt\srulal vindia ly 
\def \square#1#2{{\vcenter{\vbox{\hrule height .#2pt 
\hbox{\vrule width.#2pt height#ipt \kern#1pt 
\vrule width. #2pt} 
\hrule height .#2pt}}}} 
\def \sqr{\mathchoice\square34\square34\square{2.1}3\square{1.5}3} 
\def \Le{\; {\raise.3em\hbox{$<$}}{\kern-.8em\lower. 3em\hbox{$=$}}\ ;} 
\def \Ge{\;{\raise.3em\hbox{$>$}}{\kern-.8em\lower. 3em\hbox{$=$}}\ ;} 
\def \matrix#1{\nul1\, \vcenter{\normalbaselines\mOth 
\ialign{\hfil $##$\hfil&&\quad\hfil$##$\hfil\crer 
\mathstrut\crer\noalign{\kern-\baselineskip} 
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#1\crer\mathstrut\crcr\noalign{\kern-\baselineskip}}}\,} 
\def \pmatrix#1{\left (\matrix{#1}\right) } 
\def\Cgy{\mathop{\cal G}\nolimits} 
\def \Cov [#1] {\hbox{${\rm C}\sp{#1}({\cal V}) $}} 
\def \G1{\mathop{\raise. 23em\hbox{$>$}\kern-.71em\lower .23em\hbox{$<$}}} 
\def \Mod{\mathop{\rm mod}} 
\def \Lift#1#2{\raise#lem\hbox{#2}} 
\def \uncat codespecials{\def\do##1{\catcode‘##1=12 }\dospecials} 
\newcount \lineno 
\def\setupverbatim{\tt \lineno=0 
\def\par{\leavevmode\endgraf} \catcode‘\‘=\active 
\obeylines \uncatcodespecials \obeyspaces 
\everypar{\advance\lineno by1 \llap{\sevenrm\the\lineno\ \ }}} 
{\catcode‘\‘=\active \gdef|{\char’ 174}\gdef ‘ {\relax\lq}\obeyspaces\global\let =\ } 
\def \lListing#1{\par\smallskip\begingroup\setupverbatim\ninett\baselineskip.9em\input#1 \endgroup} 
\dotleraseit beg lags oup\niaecalat\becct ncck 15, Ben \perdadant—laa\iapaeet Wades cue 
\def \picx#1:#2:{\epsfxsize=#1 \epsffile{#2.eps}} 
\def \picy#1:#2:{\epsfysize=#1 \epsffile{#2.eps}} 
\def \nin#1: {\begingroup\baselineskiplem\leftskiplem\parindent-1lem % internet info 
\def \net##1:##2:##3:{{\tt ##1}{\it ##2}##3\par}\input #1\endgroup} 
\def \bib#1: {\begingroup\baselineskiplem\leftskiplem\parindent-lem\input #1\endgroup} 
\def \art#1:#2:#3:#4:{{\rm #1}°#27{\it #3} #4\par} 
\newcount \kpc 
\def \kart#1 [#2] #3 :#4: #5: {\advance\kpc by 1 \ix [#2] ({{\sevenrm KNT\hxdc(\romannumeral\the\kpc) }}) 


{\rm #1}~#3~{\it #4} #5 \x[#2].\par} 


104 
105 
106 
107 
108 
109 
110 
111 
112 
113 
114 
115 
116 
117 
118 
119 
120 
121 
122 
123 


124 
125 
126 
127 
128 
129 
130 
131 
132 


133 
134 
135 
136 
137 
138 
139 
140 
141 
142 
143 
144 
145 
146 
147 
148 
149 
150 
151 
152 
153 
154 
155 
156 
157 
158 


\def \bbib{\begingroup\baselineskiplem\leftskiplem\parindent-lem} \def\ebib{\endgroup} 
\def \hxdc{{\count0=\count1 \divide\count1 by16 
\ifnum\count1i>0 \hxdc\fi \count2=\count1 \multiply\count2 by-16 
\advance\count0O by\count2 \hexdigit}} 
\def \hexdigit {\ifnum\count0<10 \number\count0 
\else\advance\count0 by-10 \advance\count0 by‘A \char\countO \fi} 
4 \pictri <filei>:<file2>:<file3>:<num1>: <num2>:<num3>: 
\def\pictri#l :#2:#3:#4:#5:#6:{\smallskip 
\centerline{\vbox{\dtmp=\hsize \advance\dtmp-1iem 
\dtmpi=\hsize \advance\dtmpi-2em \divide\dtmpi by3 
\halign to\dtmp{\hfil##\hfil&\hfil##\hfil&\hfil##\hfil\cr 
\epsfxsize=\dtmpi \epsffile{#1.eps} &\epsfxsize=\dtmpi \epsffile{#2.eps} & 
\epsfxsize=\dtmpi \epsffile{#3.eps} \cr 
(#4) & (#5) & (#6) \cr}}}} 
vA \picqua <filei>:<file2>:<file3>:<file4>:<numi>: <num2>: <num3>:<num4>: 
\def \picqua#l : #2:#3:#4:#5:#6:#7:#8:{\smallskip 
\centerline{\vbox{\dtmp=\hsize \advance\dtmp-1em 
\dtmpi=\hsize \advance\dtmpi-2em \divide\dtmpi by4 
\halign to\dtmp{\hfil##\hfil&\hf il##\hfil&\hfil##\hfil&\hfil##\hfil\cr 
\epsfxsize=\dtmpi \epsffile{#1.eps} &\ifx0#6 \else\epsfxsize=\dtmpi \epsffile{#2.eps}\fi 


\ifx0#7 \else\epsfxsize=\dtmpi \epsffile{#3.eps}\fi &\ifx0#8 \else\epsfxsize=\dtmpi 
\epsffile{#4.eps}\fi\cr 
(#5) &\ifx0#6 \else(#6)\fi &\ifx0#7 \else(#7)\fi &\ifx0#8 \else (#8) \fi\cr}}}} 
4 \picpent <filel>:<file2>:<file3>:<file4>:<file5>:<num: 
\def \picpent#1:#2:#3:#4:#5:#6:{\smallskip 
\centerline{\vbox{\dtmp=\hsize \advance\dtmp-iem 
\dtmpi=\hsize \advance\dtmpi-2em \divide\dtmpi by5 
\halign to\dtmp{\hfil##\hfil&\hf il##\hfil&\hfil##\hfil&\hfil##\hfil&\hfil##\hfil\cr 
\epsfxsize=\dtmpi \epsffile{#1.eps} &\ifx0#2 \else\epsfxsize=\dtmpi \epsffile{#2.eps}\fi 


\ifx0#3 \else\epsfxsize=\dtmpi \epsffile{#3.eps}\fi &\ifx0#4 \else\epsfxsize=\dtmpi 
\epsffile{#4.eps}\fi & 
\ifx0#5 \else\epsfxsize=\dtmpi \epsffile{#5.eps}\fi\cr 
(a#6) &\ifx0#2 \else(b#6)\fi &\ifx0#3 \else(c#6)\fi &\ifx0#4 \else(d#6)\fi &\ifx0#5 
\else (e#6) \fi\cr}}}} 
\def \picsept#1:#2:#3:#4:#5:#6:#7:#8:{\smallskip 
\centerline{\vbox{\dtmp=\hsize \advance\dtmp-1em 
\dtmpi=\hsize \advance\dtmpi-4em \divide\dtmpi by7 
\halign to\dtmp{\hfil##\hfil&\hfil##\hfil&\hfil##\hfil&\hfil##\hfil&\hfil##\hfil&\hfil##\hf ile 
\hfil##\hfil\cr 
\epsfxsize=\dtmpi \epsffile{#8#1.eps} 
\epsfxsize=\dtmpi \epsffile{#8#2.eps} 
\epsfxsize=\dtmpi \epsffile{#8#3.eps} 
\epsfxsize=\dtmpi \epsffile{#8#4.eps} 
\epsfxsize=\dtmpi \epsffile{#8#5.eps} 
\epsfxsize=\dtmpi \epsffile{#8#6.eps} & 
\epsfxsize=\dtmpi \epsffile{#8#7.eps} \cr}}}} 
\def \picsepu#1: #2:#3:#4:{\smallskip 
\centerline{\vbox{\dtmp=\hsize \advance\dtmp-1lem 
\dtmpi=\hsize \advance\dtmpi-4em \divide\dtmpi by7 
\halign to\dtmp{##\hfil&\hfil##\hfil&\hfil##\cr 
\epsfxsize=\dtmpi \epsffile{#4#1.eps} & 
\epsfxsize=\dtmpi \epsffile{#4#2.eps} & 
\epsfxsize=\dtmpi \epsffile{#4#3.eps} \cr}}}} 
4, \pelr <dim_x>:<filename>:<directory>:<index>:<caption>: 
\def \pclr#1:#2:#3:#4:#5:{\begingroup\dtmp=\hsize \advance\dtmp-1iem \dtmpi=\dtmp \advance\dtmpi-#1 


BP BP BP RP RP 
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159 \advance\dtmpi-lem \smallskip \fig [#4]#5: 

160 \def\pcl{\centerline{\vbox{\hsize=\dtmp \hbox{\epsfxsize=#1 \epsffile{#3#2.eps}\quad\hfil 
161 \vbox{\hsize=\dtmpi\noindent{\bf Figure \x[#4]} #5\smallskip}}}}} 

162 \centre{} 

163. \def\per{\centerline{\vbox{\hsize=\dtmp 

164 \hbox{\vbox{\hsize=\dtmpi\noindent{\bf Figure \x[#4]} #5\smallskip} \quad\hfil 

165 \epsfxsize=#1 \epsffile{#3#2.eps}}}}} 

166 \ipno [#4] 

167 \ifodd\csname#4p\endcsname \pcr \else \pcl \fi\ct\smallskip\endgroup\pno [#4] } 

168 % \pplr <dim_x>:<filename>:<directory>:<index>:<caption>:<paragraph>: 

169 \def\pplr#1:#2:#3:#4:#5:#6:{\begingroup\dtmp=\hsize \advance\dtmp-lem 

170 \dtmpi=\dtmp \advance\dtmpi-#1 

171 \advance\dtmpi-i1em\smallskip \fig[#4]#5: 

172. \def\pcl{\centerline{\vbox{\hsize=\dtmp \hbox{\epsfxsize=#1 \epsffile{#3#2.eps}\quad\hfil 
173 \vbox{\hsize=\dtmpi\parindent=Opt #6\hfil\smallskip\noindent{\bf Figure \x[#4]} #5.\smallskip}}}}} 
174 \da#\ pee ( \canterl inet sbart\ieisestdeas 

175 \hbox{\vbox{\hsize=\dtmpi\noindent#6\hfil\smallskip\noindent\hfill{\bf Figure \x[#4]} 


176 \smallskip} \quad\hfil 

177 \hbox{\epsfxsize=#1 \epsffile{#3#2.eps}}}}}} 

178 \ipno [#4] 

179 \ifodd\csname#4p\endcsname \pcr \else \pcl \fi\ct\smallskip\endgroup\pno [#4] } 

180 \def\plr#1:#2:#3:#4:#5:#6:{\begingroup\dtmp=\hsize \advance\dtmp-lem \dtmpi=\dtmp 

181 \advance\dtmpi-#1 \advance\dtmpi-lem \smallskip \fig[#4]#5: 

182 \def\pcl{\centerline{\vbox{\hsize=\dtmp \hbox{\epsfxsize=#1 \epsffile{#3#2.eps}\quad\hfil 
183 \vbox{\hsize=\dtmpi\noindent {#6\hfil\smallskip\bf Figure #4.} #5\smallekip}i}}} 

184 \def\per{\centerline{\vbox{\hsize=\dtmp 

185 \hbox{\vbox{\hsize=\dtmpi\noindent#6\hfil\smallskip{\bf Figure #4.} #5\smallskip} \quad\hfil 
186 \hbox{\epsfxsize=#1 \epsffile{#3#2.eps}}}}}} 

187 \ipno [#2] 

188 \ifodd\csname#2p\endcsname \pcr \else \pcl \fi\ct\smallskip\endgroup\pno [#2] } 

189 \def\plrx#1:#2:#3:#4:#5:#6:{\begingroup\dtmp=\hsize \advance\dtmp-lem Adapt =\d ting 

190 \advance\dtmpi-#1 \advance\dtmpi-1lem \smallskip 

191 \def\pcl{\centerline{\vbox{\hsize=\dtmp \hbox{\epsfxsize=#1 \epsffile{#3#2.eps}\quad\hfil 
192 \vbox{\hsize=\dtmpi\noindent {#6\hfil\smallskip\bf #4.} #5\smallskip}}}}} 

193. \def\per{\centerline{\vbox{\hsize=\dtmp 

194 \hbox{\vbox{\hsize=\dtmpi\noindent#6\hfil\smallskip{\bf #4.} #5\smallskip} \quad\hfil 
195 \hbox{\epsfxsize=#1 \epsffile{#3#2.eps}}}}}} 

196 \ipno [#2] 

197 \ifodd\csname#2p\endcsname \pcr \else \pcl \fi\ct\smallskip\endgroup\pno [#2] } 

198 \def\plrs#1:#2:#3:#4:#5:#6:{\begingroup\dtmp=\hsize \advance\dtmp-lem \dtmpi=\dtmp 

199 \advance\dtmpi-#1 \advance\dtmpi-iem Kamallakip \figl#4]#5: 

200 \def\pcl{\centerline{\vbox{\hsize=\dtmp \hbox{\epsfxsize=#1 \epsffile{#3#2.ps}\quad\hfil 
201 \vbox{\hsize=\dtmpi\noindent {#6\hfil\smallskip\bf #4.} #5\smallskip}}}}} 

202 \def\pcr{\centerline{\vbox{\hsize=\dtmp 

203 \hbox{\vbox{\hsize=\dtmpi\noindent#6\hfil\smallskip{\bf #4.} #5\smallskip} \quad\hfil 
204 \hbox{\epsfxsize=#1 \epsffile{#3#2.ps}}}}}} 

205 \ipno [#2] 

206 \ifodd\csname#2p\endcsname \pcr \else \pcl \fi\ct\smallskip\endgroup\pno[#2]} 

207 4% \twop:<xsize1>:<filel>:<label1>:<xsize2>:<file2>:<label2>: 

208 \def\twop:#1:#2:#3:#4:#5:#6:{ 

209 \centerline{\hfil\epsfxsize=#1 \epsffile{#2.eps}\hfil\epsfxsize=#4 \epsffile{#5.eps}\hfil} 
210 \centerline{\hfil #3\hfil\hfil\hfil #6\hfil}} 

211 \def\tps:#1:#2:4#3:#4:#5:#6:{ 

212 \centerline{\hfil\epsfxsize=#1 \epsffile{#2.ps}\hfil\epsfxsize=#4 \epsffile{#5.ps}\hfil} 
213 \centerline{\hfil #3\hfil\hfil\hfil #6\hfil}} 

214 \def\twap:#1:#2:#3:#4:{\begingroup\dtmp=\hsize \divide\dtmp by2 \advance\dtmp-1em 

215 \centerline{\hfil\epsfxsize=\dtmp \epsffile{#1.eps}\q\epsfxsize=\dtmp \epsffile{#3.eps}\hfil} 
216 \centerline{\hfil #2\hfil\hfil\hfil #4\hfil}\endgroup} 

217 % \ppr<directory>:<figi>:<figid>: <fig2>:<fig2d>{<capti>}{<capt2>} 

218 \def\ppr#1:#2:#3:#4:#5:#6#7{\begingroup\dtmp=\hsize \advance\dtmp-3em \dtmpi=\dtmp 

219 \divide\dtmpi by 4 Nena le kip\parindenteont \dtmpii=0pt 

220 \setboxi=\vbox{\hsize=2\dtmpi #6} \setbox2=\vbox{\hsize=2\dtmpi #7} 

221 \ifdim\dtmpii<\ht1 \dtmpii=\ht1i\fi \ifdim\dtmpii<\ht2 \dtmpii=\ht2\fi 

222 \centerline{\epsfxsize=\dtmpi \epsffile{#1#2.eps}~\epsfxsize=\dtmpi \epsffile{#1#3.eps}\hfil 
223 \epsfxsize=\dtmpi \epsffile{#1#4.eps}~\epsfxsize=\dtmpi \epsffile{#1#5.eps}} 

224 \centerline{\vbox to\dtmpii{\hsize=\dtmpi\unvbox1\vfil}\hfil 

225 \vbox to\dtmpii{\hsize=\dtmpi\unvbox2\vfil}}\smallskip 

226 \endgroup} 

227 \def\prir#1:#2:#3:#4{\begingroup\dtmp=\hsize \advance\dtmp-3em \dtmpi=\dtmp \divide\dtmpi 


228 \dtmp=\dtmpi \advance\dtmplex \dtmpii=\dtmpi \advance\dtmpii-1lex \smallskip\parindent=0pt 

229 \setbox1=\vbox{\hsize=2\dtmp \hfil\epsfxsize=\dtmpi \epsffile{#1#2.eps} 

230 “\epsfxsize=\dtmpi \epsffile{#1#3.eps}\hfil} 

231 \setbox2=\vbox{\hsize=2\dtmpii #4\smallskip} 

232. ~\setbox3=\vbox{\hsize=2\dtmpii \hfill#4\smallskip} 

233 \def\pcl{\centerline{\copy1\hfil\copy3}} \def\pcr{\centerline{\copy2\hfil\copy1}} 

234 =\ipno [#3] 

235 \ifodd\csname#3p\endcsname \pcr \else \pcl \fi\ct\endgroup\pno [#3] } 

236 \def\ptlr#1:#2:#3:#4:#5{\begingroup\dtmp=\hsize \advance\dtmp-3em \dtmpi=\dtmp \divide\dtmpi 
by 4 

237 \dtmp=\dtmpi \advance\dtmplex \dtmpii=\dtmpi \advance\dtmpii-1ex\smallskip\parindent=0pt 
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238 «=\setbox1=\vbox{\hsize=3\dtmp \epsfxsize=\dtmpi \epsffile{#1#2.eps} 

239 “\epsfxsize=\dtmpi \epsffile{#1#3.eps} ~\epsfxsize=\dtmpi \epsffile{#1#4.eps}} 
240 \setbox2=\vbox{\hsize=\dtmpii #5\smallskip} 

241 \setbox3=\vbox{\hsize=\dtmpii \hfill#5\smallskip} 

242 \def\pcl{\centerline{\copy1\hfil\copy3}} \def\pcr{\centerline{\copy2\hfil\copy1}} 
243 =\ipno [#4] 

244 \ifodd\csname#4p\endcsname \pcr \else \pcl \fi\ct\endgroup\pno[#4]} 

245 \def\capt#1:#2:#3:{\nobreak\smallskip 

246 \centerline{\dtmp=\hsize \advance\dtmp-2em \vbox{\hsize \dtmp \noindent 

247 {\bf #1 #2} {\it #3}}}\smallskip} 

248 \def\balg{\begingroup\smallskip\begingroup\obeylines \sfcode‘ ;=3000 

249 \def\b(##1]{{\bf ##1}} \def\il##i]{{\it ##1}} \def\r[##1]{{\rm ##1}}} 

250 \def \ealg{\par\endgroup\endgroup\smallskip} 

251 \def\q{\quad} \def\qq{\qquad} \def\qqq{\qq\q} \def\qqqq{\qq\qq} 

252 \def\qqqaqt\qq\qq\q}_ \def \qqqqaqt\qq\qq\qq} 

253 \dee\brect tag iunnanp\tedeici ovbop ima roun nar ident sont \obeyiined \def\atpg{\dotfill1}} 
254 \def\etoc{\endgroup\endgroup\medskip} 

255 \def\bdsc#1\edsc{\begingroup\smallskip\dtmp=\hsize \advance\dtmp-3em 

256 \centerline{\hfil\boxit{\vbox{\hsize=\dtmp #1}}\hfil}\par\endgroup\smallskip} 
257 \def\picl#1:#2:#3:#4:{\dtmp=\hsize \advance\dtmp-lem \dtmpi=\dtmp \advance\dtmpi-#1 \smallskip 
258 \centerline{\vbox{\halign to\dtmp{##\hfil&\hfil##\cr 

259 \epsfxsize=#1 \epsffile{#2.eps}& 

260 \vbox{\hsize=\dtmpi\noindent{\bf Figure \x[#3]} #4\smallskip}\cr}}}\smallski} 

261 \def\tbv#1:#2:#3:#4:#5: {\begingroup\smallskip 

262 RpariadentOpe centerline \ebos (\atape\heiee \advance\dtmp-2em 

263 \dtmpi=\dtmp \divide\dtmpi by5 \advance\dtmpi-.5em \def\h[##1]{\hskip.3em\sl##1} 
264 \setbox1=\vbox{\hsize=\dtmpi#1} \setbox2=\vbox{\hsize=\dtmpi#2} 

265 \setbox3=\vbox{\hsize=\dtmpi#3} 

266 \setbox4=\vbox{\hsize=\dtmpi#4} \setbox5=\vbox{\hsize=\dtmpi#5} \dtmpii=Opt 

267 \ifdim\dtmpii<\ht1 \dtmpii=\hti\fi \ifdim\dtmpii<\ht2 \dtmpii=\ht2\fi 

268 \ifdim\dtmpii<\ht3 \dtmpii=\ht3\fi \ifdim\dtmpii<\ht4 \dtmpii=\ht4\fi 

269 \ifdim\dtmpii<\ht5 \dtmpii=\ht5\fi 

270 \halign to\dtmp{##\hf i1&##\hfil&##\hfile##\hfil&##\hfil\cr 

ore \vbox to\dtmpii{\hsize=\dtmpi\unvbox1\vfil} &\vbox to\dtmpii{\hsize=\dtmpi\unvbox2\vfil} 


272 \vbox to\dtmpii{\hsize=\dtmpi\unvbox3\vfil} &\vbox to\dtmpii{\hsize=\dtmpi\unvbox4\vfil} 


273 \vbox to\dtmpii{\hsize=\dtmpi\unvbox5\vfil}\cr}}}\endgroup} 

274 \def\tbiv#1:#2:#3:#4:{\begingroup\smallskip\parindentOpt 

275 \centerline{\vbox{\dtmp=\hsize \advance\dtmp-2em 

276 \dtmpi=\dtmp \divide\dtmpi by4 \advance\dtmpi-.5em \def\h[##1]{\hskip.3em\s1##1} 
277 \setbox1=\vbox{\hsize=\dtmpi#1} \setbox2=\vbox{\hsize=\dtmpi#2} 

278 \setbox3=\vbox{\hsize=\dtmpi#3} 

279 \setbox4=\vbox{\hsize=\dtmpi#4} \dtmpii=Opt 

280 \ifdim\dtmpii<\ht1 \dtmpii=\hti\fi \ifdim\dtmpii<\ht2 \dtmpii=\ht2\fi 

281 \ifdim\dtmpii<\ht3 \dtmpii=\ht3\fi \ifdim\dtmpii<\ht4 \dtmpii=\ht4\fi 

282 \ifdim\dtmpii<\ht5 \dtmpii=\ht5\fi 

283 \halign to\dtmp{##\hfil&##\hfils##\hfil&##\hfil\cr 

284 \vbox to\dtmpii{\hsize=\dtmpi\unvbox1\vfil} &\vbox to\dtmpii{\hsize=\dtmpi\unvbox2\vfil} 


285 \vbox to\dtmpii{\hsize=\dtmpi\unvbox3\vfil} & 

286 \vbox to\dtmpii{\hsize=\dtmpi\unvbox4\vfil}\cr}}}\endgroup} 

287 \def\tabhead{\def\erule{\vskip.2em\hrule\vskip .2em} 

288 \def\ptl{\quad} \def\ptr{\hfil\quad}} 

289 \def\trule{\noalign{\vskip.2em\hrule\vskip.2em}} 

290 \def\tbl#1\lbt{\begingroup\dtmp=\hsize \advance\dtmp-3em \smallskip 

291 \centerline{\vbox{\hsize=\dtmp \halign{##\hfil&&\quad##\hfil&\quad##\hfil\cr #1}}}\endgroup} 
292 \def\fgr [#1] (#2) #3\rgf{\begingroup\dtmp=\hsize \divide\dtmp by#1 \advance\dtmp-1lem 

293 \def\pic[##1]{\epsfxsize=\dtmp \epsffile{#2##1.eps}} 

294 \centerline{\vbox{\halign{##&&\hfil##\hfil&##\cr #3\cr}}}\endgroup} 

295 \def\fg1[#1]#2\lgf{\begingroup\dtmp=\hsize \divide\dtmp by#1 \advance\dtmp-1em 

296 \def \lab [##1] {\hbox to\dtmp{\hfil##1\hfil}} 

297 \centerline{\vbox{\halign{##&&\hfil##\hfil&##\cr #2\cr}}}\endgroup} 

2908 % \Pp<lattice>:<Pc type>:<number\(<order>),...>:<Pc prob.>:<std. error>: 

2909 \def\Pp#1:#2:#3:#4:#5:{\begingroup \def\(##1){({\bf##1})} 

300 \def\Vii{Vn 2d} \def\Viii{Vn 3d} \def\Viis{Vn (2,3)s} 

301 ${}-{\hbox{\sixit #1}}_{\scriptscriptstyle #3}p_#2$ $=$ $#4\pm #5$\endgroup} 

302 \def\X#1:#2:#3:#4:#5:{\begingroup \def\(##1) {({\bf##1})} \def\Vii{Vn 2d} \def\Viii{Vn 3d} 
303 \def\Viis{Vn (2,3)s} 

304 \ifx0#5 ${}*{\hbox{\sixit #1}}_{\scriptscriptstyle #3}x_#2$ $=$ $#4$ 

305 \else${}*{\hbox{\sixit #1}}_{\scriptscriptstyle #3}x_#2$ $=$ $#4\pm #5$\fi\endgroup} 
306 \def\din#1.#2.#3.#4.{\begingroup\def\der [##1]{{\bf ##1},} 4% #1 \latin, #2 \tenbf , #3 \ninepoint 
307 \def\wi##1:{\dtmpi=\hsize \advance\dtmpi-.3em \dtmpii=\dtmpi \advance\dtmpii-.3em 

308 \parshape=2 Opt \dtmpi .3em \dtmpii {#2 ##1.~}} 

309 \def\Bf [##1]{{\bf##1}} \def\(##1) {{\it##1}} \def\S1[4##1] {{\sl##1}} \def\[##1] {{\tt##1}} 
310 #1\dtmp=\hsize 

311 \begindoublecolumns\hsize=\dtmp \divide\hsize by2 \advance\hsize by-2em 

312 \baselineskip.9em\parindentOpt #3 

313 \input #4 

314 \enddoublecolumns\endgroup} 

315 \long\def \t [#1] {\def\next {#1} {\tt\frenchspacing\expandafter\strip\meaning\next}} 

316 \def\strip#1>{} 


317 
318 
319 
320 
321 
322 
323 
324 
325 
326 
327 
328 
329 
330 
331 
332 
333 
334 
335 
336 
337 
338 
339 
340 
341 
342 
343 
344 
345 
346 
347 
348 
349 
350 
351 
352 
353 
354 
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356 
357 
358 
359 
360 
361 
362 
363 
364 
365 
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367 
368 
369 
370 
371 
372 
373 
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375 
376 
377 
378 
379 
380 
381 
382 
383 
384 
385 
3386 
387 
388 
389 
390 
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392 
393 
304 
395 
396 
397 
398 
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\def \idx [#1]{\beginindex\input #1\endindex} 

\def \t chd{\def\leftheadline{\hbox to \pagewidth{%, 
\vbox to 10pt{}% strut to position the baseline 
\llap{\tenbf\romannumeral\folio\kernipc}% folio to left of text 
\tenit\rhead\hfil% running head flush left 


}} 

\def\rightheadline{\hbox to \pagewidth{%, 
\vbox to 10pt{}% strut to position the baseline 
\hfil\tenit\rhead\/% running head flush right 
\rlap{\kernipc\tenbf\romannumeral\folio}% folio to right of text 
}}} 

\newbox\partialpage 

\def \begindoublecolumns{\dtmp=\hsize \dtmpi=\vsize\begingroup 
\output={\global\setbox\partialpage=\vbox{\unvbox255\bigskip}}\eject 
\output={\doublecolumnout} \hsize=\dtmp \divide\hsize by2 \advance\hsize-.4em 
\vsize=\dtmpi \multiply\vsize by2 \advance\vsize ty 4am 

\def \enddoublecolumns{\out put={\balancecolumns}\eject 
\endgroup \pagegoal=\vsize} 

\def \doublecolumnout{\splittopskip=\topskip \splitmaxdepth=\maxdepth 
\dtmp=\dtmpi \dimen@=\dtmp \advance\dimen@ by-\ht\partialpage 
\setbox0=\vsplit255 to\dimen@ \setbox2=\vsplit255 to\dimen@ 
\onepageout \pagesofar 
\unvbox255 \penalty\outputpenalty} 

\def \pagesofar{\unvbox\partialpage 
\wd0=\hsize \wd2=\hsize \hbox to\pagewidth{\box0\hfil\box2}} 

\def \balancecolumns{\setbox0=\vbox{\unvbox255} \dimen@=\ht0 
\advance\dimen@ by\topskip \advance\dimen@ by-\baselineskip 
\divide\dimen@ by2 \splittopskip=\topskip 
{\vbadness=10000 \loop \global\setbox3=\copy0 

\global\setbox1=\vsplit3 to\dimen@ 

\ifdim\ht3>\dimen@ \global\advance\dimen@ byipt \repeat} 
\setbox0=\vbox to\dimen@{\unvbox1} 
\setbox2=\vbox to\dimen@{\unvbox3} 
\pagesofar} 

\def \begintriplecolumns{\dtmp=\hsize \dtmpi=\vsize \begingroup 
\output={\global\setbox\partialpage=\vbox{\unvbox255\bigskip}}\eject 
\output={\triplecolumnout} \hsize=\dtmp \divide\hsize by3 \advance\hsize by-.4em 

\vsize=\dtmpi \multiply\vsize by3 \advance\vsize by.4em} 

\def \endtriplecolumns{\output={\balancethreecolumns}\eject 
\endgroup \pagegoal=\vsize} 

\def\triplecolumnout{\splittopskip=\topskip \splitmaxdepth=\maxdepth 
\dtmpii=\dtmpi \dimen@=\dtmpii \advance\dimen@ by-\ht\partialpage 
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\setbox0=\vsplit255 to\dimen@ \setbox2=\vsplit255 to\dimen@ \setbox4=\vsplit255 to\dimen@ 


\onepageout \pagesofar 
\unvbox255 \penalty\outputpenalty} 
\def \pagesofar{\unvbox\partialpage 
\wd0=\hsize \wd2=\hsize \wd4=\hsize \hbox to\pagewidth{\box0\hfil\box2\hfil\box4}} 
\def \balancethreecolumns{\setbox0=\vbox{\unvbox255} \dimen@=\ht0 
\advance\dimen@ by\topskip \advance\dimen@ by-\baselineskip 
\divide\dimen@ by3 \splittopskip=\topskip 
{\vbadness=10000 \loop \global\setbox5=\copy0 
\global\setbox1=\vsplit5 to\dimen@ 
\global\setbox3=\vsplit5 to\dimen@ 
\ifdim\ht5>\dimen@ \global\advance\dimen@ byipt \repeat} 
\setbox0=\vbox to\dimen@{\unvbox1} 
\setbox2=\vbox to\dimen@{\unvbox3} 
\setbox4=\vbox to\dimen@{\unvbox5} 
\pagesofar} 
%, c£. manmac.tex 
\def \onepageout#1{\shipout \vbox{ 4% here we define one page of output 
\offinterlineskip 4 butt the boxes together 
\vbox to 3pc{ % this part goes on top of the 44pc pages 
\iftitle % the next is used for title pages 
\global\titlefalse % reset the titlepage switch 
\setcornerrules 4% for camera alignment 
\else\ifodd\pageno \rightheadline\else\leftheadline\fi\fi 
\vfill} % this completes the \vbox to 3pc 
\vbox to \pageheight{\dtmp=\hsize \advance\dtmp bylpc 
\ifvoid\margin\else % marginal info is present 
\rlap{\kern\dtmp\vbox to\z@{\kern4pt\box\margin \vss}}\fi 
#1 % now insert the main information 
\ifvoid\footins\else % footnote info is present 
\vskip\skip\footins \kern-3pt 
\hrule height\ruleht width\pagewidth \kern-\ruleht \kern3pt 
\unvbox\footins\fi 
\boxmaxdepth=\maxdepth 
} % this completes the \vbox to \pageheight 


\advancepageno} 
\def\pap#1{\begingroup\parindent=1lem \ninerm\input #1\endgroup} 
\def \lhd [#1] {\leftline{\(\tenrm\bf #1) }} 
\def \chd [#1] {\centerline{\(\tenrm #1) }} 
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\def \qte [#1] [#2] {\begingroup\dtmp=\hsize \advance\dtmp-3em 
\setbox1=\vbox{\hsize=\dtmp \parindent=Opt #1\smallskip\rightline{#2}} 
\smallskip\centerline{\copy1}\smallskip\endgroup} 
\def \quo [#1] {\begingroup \def\|{\par} \dtmp=\hsize \advance\dtmp-5em 
\setbox1=\vbox{\hsize=\dtmp \parindent=Opt #1} 
\smallskip\centerline{\copy1}\smallskip\endgroup} 
\def \bitm[#1]{\smallskip\begingroup \def\itm{\item{#1}}} 
\def \eitm{\endgroup\smallskip} 
\def \btmn#1\etmn{\smallskip\begingroup \tmp=0 
\def\itm{\advance\tmp by 1 \item{\the\tmp.}} #1\endgroup\smallskip} 
\def \btma#1\etma{\smallskip\begingroup \tmp=96 
\def\itm{\advance\tmp by 1 \item{\char\tmp.}} #1\endgroup\smallskip} 
\def \btab [#1] #2\etab{\centerline{\setbox1=\vbox{#2} 
\vbox{\halign{#1\let |=& 
\let#*=\cr 
\copy1}}}} 
\def\tdim{\dtmp=\hsize \advance\dtmp by-2em \hsize=\dtmp} 
\newcount\pam \pam=96 
\def \lox (#1) [#2] {\centerline{{\twelvebf #1}}\global\advance\pam by 1 
\begingroup\medskip\begingroup\parindent=0pt\obeylines 
\immediate\write\ref{\string\ix [#2] (\char\the\pam) } 
\immediate\write\ref{\string\ix[#2n] (#1)} \immediate\write\ref{\string\ix [#2p] (\number\pageno) } 
\ix [#1] (\char\the\pam) \ix[#2n] (#1) \ix[#2p] (\number\pageno) 
\ifundefined{toc} \else\immediate\write\toc{\x[#2]. \x[#2n]\hfil\dotfill\x[#2p]}\fi 
\input #2 
Nenderato\end roup\bigskip} 
\def \Loy (#1) [#2] {\centerline{{\twelvebf #1}}\global\advance\pam by 1 
\begingroup\medskip\beg ingroup \parindent=0pt \obeylines 
\immediate\write\ref{\string\ix [#2] (\char\the\pam) } 
\immediate\write\ref{\string\ix[#2n] (#1)} \immediate\write\ref{\string\ix [#2p] (\number\pageno) } 
\ix [#1] (\char\the\pam) \ix[#2n] (#1) \ix[#2p] (\number\pageno) 
\endgroup\endgroup\bigskip} 
\newcount\ape \apc=64 
\def \app [#1]#2:#3:{\advance\apc by 1 
\immediate\write\ref{\string\ix [#1] (\char\the\apc) } 
\immediate\write\ref{\string\ix [#1n] (#2) } \immediate\write\ref{\string\ix [#1p] (\number\pageno) } 
\ix [#1] (\char\the\apc) \ix[#1n] (#2) \ix[#1p] (\number\pageno) 
\beginchapter {\Title\ Appendix} {}{\char\apc}. {\x[#in]}\par 
\ifundefined{toc} \else\immediate\write\toc{\x [#1]. \x[#1n]\hfil\dotfill\x[#1p]}\fi 
\S\ \Bf \x([#1]. \x[#1n]:\par \begingroup\input #3 \endgroup\par 
\stn=0 \alc=0 \fgc=0 \tbc=0 \cac=0 \tmc=0 \asm=0 \dfc=0} 
\newcount \cch 
\def \chp [#1]#2:#3:{\advance\cch by 1 
\immediate\write\ref{\string\ix [#1] (\the\cch) } 
\immediate\write\ref{\string\ix [#1n] (#2) } \immediate\write\ref{\string\ix [#1p] (\number\pageno) } 
\ix [#1] (\the\cch) \ix[#1n] (#2) \ix[#1p] (\number\pageno) 
\beginchapter {\Title\ Chapter} Ot\x #11}. {\x [#1n]}\par 
\ifundefined{toc} \else\immediate\write\toc{\x [#1]. \x[#1n]\dotfill\x[#1p]}\fi 
\S\ \Bf \x [#1]. \x[#1n]:\par \begingroup\input #3 \endgroup\par 
\stn=0 \alc=0 \fgc=0 \tbc=0 \cac=0 \tmc=0 \asm=0 \dfc=0} 
\newcount \stn 
\def \sap [#1]#2:#3:{\advance\stn by 1 
\immediate\write\ref{\string\ix [#1] (\char\the\apc. \the\stn) } 
\immediate\write\ref{\string\ix [#1n] (#2) } \immediate\write\ref{\string\ix [#1p] (\number\pageno) } 
\ix [#1] (\char\the\apc.\the\stn) \ix[#1n] (#2) \ix[#1p] (\number\pageno) 
\beginsection 
\ifundefined{toc} \else\immediate\write\toc{\q\x [#1]. \x[#1n]\dotfill\x[#1p]}\fi 
\S\ {\bf\x [#1] \x[#in]}\par \begingroup\input #3 \endgroup\par} 
\def\sct [#1]#2:#3:{\advance\stn by 1 
\immediate\write\ref{\string\ix [#1] (\the\cch. \the\stn) } 
\immediate\write\ref{\string\ix [#1n] (#2)} \immediate\write\ref{\string\ix [#1p] (\number\pageno) } 
\ix [#1] (\the\cch.\the\stn) \ix[#1n] (#2) \ix[#1p] (\number\pageno) 
\beginsection 
\ifundefined{toc} \else\immediate\write\toc{\q\x [#1]. \x[#1n]\dotfill\x[#1p]}\fi 
\S\ {\bf\x [#1] \x[#1in]}\par \begingroup\input #3 \endgroup\par} 
\newcount \alc 
\def \alg [#1]#2:{\advance\alc by 1 
\immediate\write\ref{\string\ix [#1] (\the\cch.\the\alc) } 
\immediate\write\ref{\string\ix [#1n] (#2)} \immediate\write\ref{\string\ix [#1p] (\number\pageno) } 
\ix [#1] (\the\cch.\the\alc) \ix[#1n] (#2) \ix[#1p] (\number\pageno) 
\ifundefined{log} \else\immediate\write\log{\x[#1]. \x[#1n]\dotfill\x[#1p]}\fi} 
\newcount \eqc 
\def \eqn{\global\advance\eqe by 1\eqno{(\bf\the\eqc) _{\hbox{\sevenrm\romannumeral \the \cch}}}} 
\def \eql {\global\advance\eqce by 1 (\bf\the\eqc) _{\hbox{\sevenrm\romannumeral \the\cch}}} 
\def \eqa[#1]#2: {\global\advance\eqc by 1 
\immediate\write\ref{\string\ix [#1] (\the\cch.\the\eqc) } 
\immediate\write\ref{\string\ix [#1n] (#2)} \immediate\write\ref{\string\ix [#1p] (\number\pageno) } 
\ix [#1] (\the\cch.\the\eqc) \ix[#1n] (#2) \ix[#1p] (\number\pageno) 
\eqno{(\bf\the\eqc) _{\hbox{\sevenrm\romannumeral \the \cch}}}} 
\def \eqal [#1] #2:{\global\advance\eqe by 1 
\immediate\write\ref{\string\ix [#1] (\the\cch.\the\eqc) } 
\immediate\write\ref{\string\ix [#1n] (#2)} \immediate\write\ref{\string\ix[#1p] (\number\pageno) } 
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\ix [#1] (\the\cch.\the\eqc) \ix[#1n] (#2) \ix[#1p] (\number\pageno) 
(\bf\the\eqc) _{\hbox{\sevenrm\romannumeral \the\cch}}} 

\newcount \fgc 

\def \f ig #11#2: {\global\advance\fgc by 1 
\immediate\write\ref{\string\ix [#1] (\the\cch.\the\fgc) } 
\immediate\write\ref{\string\ix [#1n] (#2) } 
\ifundefined{#1p}\immediate\write\ref{\string\ix[#1p] (\number\pageno)} \ix[#1p] (\number\pageno) \fi 
\ix [#1] (\the\cch.\the\fgc) \ix[#1n] (#2) 

\ifundefined{lof} \else\immediate\write\lof{\x [#1]. \x[#1n]\dotfil1\x[#1p]}\fi} 

\newcount \tbe 

\def \tab [#1]#2:{\advance\tbe by 1 
\immediate\write\ref{\string\ix [#1] (\the\cch.\the\tbc) } 

\immediate\write\ref{\string\ix [#1n] (#2)} \immediate\write\ref{\string\ix [#1p] (\number\pageno) } 
\ix [#1] (\the\cch.\the\tbc) Rie Lain] 42) \ix [#1p] (\number\pageno) 
\ifundefined{lot} \else\immediate\write\lot{\xl#1]. \x[#1n]\dotfil1\x[#1p]}\fi} 

\newcount \cac 

\def\proclaim #1. #2\par{\medbreak 

\noindent {\bf#1.\enspace}{\sl#2\par}% 
\ifdim\lastskip<\medskipamount \removelastskip\penalty55\medskip\fi} 

\def \cly [#1]#2:#3\par{\advance\cac by 1 
\immediate\write\ref{\string\ix [#1] (\the\cch. \the\cac) } 
\immediate\write\ref{\string\ix [#1n] (#2)} \immediate\write\ref{\string\ix [#1p] (\number\pageno) } 
\ix [#1] (\the\cch.\the\tmc[\the\cac]) \ix[#1n] (#2) \ix[#1p] (\number\pageno) 

\proclaim Corollary \x[#1]. #3\par 
\ifundefined{lom} \else\immediate\write\lom{\x [#1]. \x[#1n]\dotfil1\x[#1p]}\fi} 

\newcount \asm 

\def \asu[#1]#2:#3\par{\advance\asm by 1 
\immediate\write\ref{\string\ix [#1] (\the\cch.\the\asm) } 
\immediate\write\ref{\string\ix [#1n] (#2)} \immediate\write\ref{\string\ix [#1p] (\number\pageno) } 
\ix [#1] (\the\cch.\the\tmc) \ix[#1n] (#2) \ix[#1p] (\number\pageno) 

\proclaim Assumption \x[#1]. #3\par 
\ifundefined{los} \else\immediate\write\los{\x[#1]. \x[#1n]\dotfill\x[#1p]}\fi} 

\newcount \dfc 

\def \dfn [#1]#2:#3\par{\advance\dfc by 1 
\immediate\write\ref{\string\ix [#1] (\the\cch.\the\dfc) } 
\immediate\write\ref{\string\ix [#1n] (#2)} \immediate\write\ref{\string\ix [#1p] (\number\pageno) } 
\ix [#1] (\the\cch.\the\tmc) \ix[#1n] (#2) \ix[#1p] (\number\pageno) 

\proclaim Definition \x[#1]. #3\par 
\ifundefined{lod} \else\immediate\write\lod{\x[#1]. \x[#1n]\dotfill\x[#1p]}\fi} 

\newcount \tmc 

\def \thm[#1]#2:#3\par{\advance\tmc by 1 
\immediate\write\ref{\string\ix [#1] (\the\cch. \the\tmc) } 
\immediate\write\ref{\string\ix [#1n] (#2)} \immediate\write\ref{\string\ix[#1p] (\number\pageno) } 
\ix [#1] (\the\cch.\the\tmc) \ix[#1n] (#2) \ix[#1p] (\number\pageno) 

\proclaim Theorem \x[#1]. #3\par 
\ifundefined{lom} \else\immediate\write\lom{\x [#1]. \x[#1n]\dotfil1\x[#1p]}\fi} 
\def \xp [#1] {\immediate\write\ref {\string\ix [#1] (\number\pageno)} \ix [#1] (\number\pageno) } 
\def \mctb [#1:#2:#3:#4:#5:#6: #7: #8] {\smallskip\begingroup\dtmp=\hsize 
\advance\dtmp2em \divide\dtmp by7 
\dtmpi=Opt 
\setbox1=\vbox{\hsize=\dtmp #3} 
\dtmpii=\ht1 
\ifdim\dtmpii>\dtmpi \dtmpi=\dtmpii\fi 
\setbox1=\vbox{\hsize=\dtmp #4} 
\dtmpii=\ht1 
\ifdim\dtmpii>\dtmpi \dtmpi=\dtmpii\fi 
\setbox1=\vbox{\hsize=\dtmp #5} 
\dtmpii=\ht1 
\ifdim\dtmpii>\dtmpi \dtmpi=\dtmpii\fi 
\setbox1=\vbox{\hsize=\dtmp #6} 
\dtmpii=\ht1 
\ifdim\dtmpii>\dtmpi \dtmpi=\dtmpii\fi 
\setbox1=\vbox{\hsize=\dtmp #7} 
\dtmpii=\ht1 
\ifdim\dtmpii>\dtmpi \dtmpi=\dtmpii\fi 
\setbox1=\vbox{\hsize=\dtmp #8} 
\dtmpii=\ht1 
\ifdim\dtmpii>\dtmpi \dtmpi=\dtmpii\fi 
\eanterlide \ebor (hal ign ##\bEiLeH#H#\HLiLSHH\HLILSHH\hEilLS#H#\ ht il&s##\hfil\cr 
\nultispan{6}{\hfill#1\hfill}\cr\trule 
\vbox{\hsize=\dtmp\parindent=0Opt~\(Cel1)} &\vbox{\hsize=\dtmp\parindent=0pt~\ (Bond) } 
&\vbox{\hsize=\dtmp\parindent=0pt~\(cell)} &\vbox{\hsize=\dtmp\parindent=0pt~\ (bond) } 
&\vbox{\hsize=\dtmp\parindent=0pt~\(vertex)} &\vbox{\hsize=\dtmp\parindent=0pt” \ (edge) } 


#2\cr 
\vbox to\dtmpi{\hsize=\dtmp\parindent=Opt #3\hfil\vfill} 
&\vbox to\dtmpi{\hsize=\dtmp\parindent=0pt #4\hfil\vfill} 
&\vbox to\dtmpi{\hsize=\dtmp\parindent=0pt #5\hfil\vfill} 
&\vbox to\dtmpi{\hsize=\dtmp\parindent=Opt #6\hfil\vfill} 
&\vbox to\dtmpi{\hsize=\dtmp\parindent=0pt #7\hfil\vfill} 
&\vbox to\dtmpi{\hsize=\dtmp\parindent=Opt #8\hfil\vfill}\cr}}}\endgroup} 
\def \mvmm (#1 ; #2; #3 ,#4;#5,#6) {\begingroup\sevenrm\set box1=\hbox{#1$\ pm$#2} 
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562 \ifx0#4\def\tmpa{#3}\else\def\tmpa{#3\times 10°{#4}}\fi 
563 \ifx0#6\def\tmpb{#5}\else\def\tmpb{#5\times 10°{#6}}\fi 
564 $\mathrel{\mathop{\copy1}\limits_{\tmpa\atop\tmpb}}$\endgroup} 
565 \def\cn(#1,#2/#3) {\begingroup\sevenrm 
566 \setbozi=\hbor {#1 [#oT} \dtmp=\wd1 
567 \setbox2=\hbox{\fiverm#3} 
568 \ifdim\wd2>\dtmp \dtmp=\wd2\fi 
569 \setbox2=\hbox{\fiverm#3} 
570 $\mathop{\copy1}\limits_{\copy2}$\endgroup} 
571 % 2-homohedral tilings 
572 \def\hm#1.{\begingroup\def\(##1) {{\rm ##1}} \ifcase#1\or$3_3[373]7_1[3°7]$\or$3_3[3°3]9_3[379] _\(1I) $ 
573 \or$4_4[374]8_4[3°8] $\or$3_3[373]8_2 [378] $\or$3_3[3°3]9_3[379]_\ (III) $\or$4_3[374]10_6[37{10}]_\(1I) $ 
574 \or$3_3[373]9_3[3°9] _\ (1) $\or$4_2 [374] 10_4[37{10}] $\or$4_3 [374] 10_6[37{10}] _\ (II) $\or$4_2[374]8_2[3°8]$ 
575 \or$4_3[374]8_3[378]_\ (1) $\or$4_3 [374] 8_3[378]_\ (II) $\or$4_3 [374] 8_3[378] _\ (III) $ 
576 \or$4_4[374]7_2[3°7] _\ (11) $\or$3_3 [373] 12_6[37{12}] $\or$4_4[374]7_2[377] _\ (1) $\or$5_4[3°5]7_4[3°7]_\(1)$ 
577 \or$3_1[473]5_1[475]_\ (1) $\or$3_1[473]5_1[475]_\ (II) $\or$5_3[375]8_6[378]_\ (II) $ 
578 \or$5_3[375]8_6[378] _\ (III) $\or$5_2 [375] 12_{12}[37{12}]$\or$5_4[375]7_4[3°7]_\ (11) $ 
579 \or$5_3[375]8_6[378] _\(1) $\or$4_2[374]12_6[37{12}] $\or$4_2 [374] 18_{12}[37{18}]$\or$5_3[375]7_3[3°7]_\(1)$ 
580 \or$5_3[3°5]7_3[377] _\ (11) $\or$3_2 [4°3]5_2[475] _\(I) $\or$3_2[473]5_2 [475] _\ (II) $\or$3_3[4°3]5_3[4°5]$ 
581 \or$3_1[473]6_2[4°6]_\(1) $\or$3_1[473]6_2[476]_\ (II) $\or$3_2[473]6_4[4°6] $\or$3_3[473]6_6[476]$ 
582 \or$3_1[473]8_4[478] $\or$3_1[573]4_2[574]_\ (1) $\or$3_1[573]4_2[574] $\or$3_2 [573] 4_4[574] $\fi\endgroup} 
583 \def\kittix{$\raise.1em\hbox{$>$}$\kern-.2em\raise .118em\hbox{: }Kittix} 
584 \def\blr{\begingroup \dtmp=\hsize \advance\dtmp-lem \dtmpi=\dtmp 
585 \advance\dtmpi-1lem \divide\dtmpi by2 \parindentOpt \def\stn{\smallskip} 
586 \def\b(##1]{\bf ##1} \def\[##1]{\it ##1} 
587 \def\l##1:##2: {\setbox0=\vbox{\hsize=\dtmpi\sl##1} \setbox1=\vbox{\hsize=\dtmpi##2} 
588 \ifnum\ht0O>\ht1 \dtmpii=\htO \else \dtmpii=\ht1i \fi 
589 \centerline{\vbox to\dtmpii{\hsize=\dtmpi\sl##1}\hfil\vbox to\dtmpii{\hsize=\dtmpi##2}}}} 
590 \def\elr{\endgroup} 
591 \def\wra [#1] [#2] [#3] {\begingroup\baselineskip=2em\setbox1=\hbox{#3}$\aleph (\hbox{#1}) =$ 
592 $\bigl\{$[#2], (\copy1) $\bigr\}$\endgroup} 
a \dez\wrs [1] [425 [48] [44] {8\aLepn (\nboxt#1})=¢ $\bigl\{$[#2], (#3), $\langle$#4$\rangle$ 
bigr 
aoa” \der \headed {\hbox(} \vskip#1} \def\setcornerrules{} \def\inpt [#1]{\input #1} 
595 \def\beginchapter#1 #2#3. #4\par{\global\exno=0 
596 \subsecno=0 
597 \def\chapno{#2#3} 
598  \titlepage 
599 \def\\{ } % \\’s in the title will be treated as spaces 
600 \message{#1 #2#3:} % show the chapter title on the terminal 
601 \xdef\rhead{#1 #2#3: #4\unskip} 
602 {\def\TeX{T\kern- .2em\lower .5ex\hbox{E}\kern-.06em X} 
603 \def\MF{{\vbox to30pt{}\manual () *+,-.*}} 
604 \def\\{#3} 
605 \ifx\empty\\ \ifodd\pageno \rightline{\inchhigh #2\kern-.04em} 
606 \else\leftline{\inchhigh #2\kern-.04em}\fi 
607 \else\ifodd\pageno \rightline{\inchhigh #2\kern-.06em#3\kern- .04em} 
608 \else\leftline{\inchhigh #2\kern-.04em}\fi\fi 
609 \vskip .75pc 
610 \baselineskip 16pt \lineskiplimit \titlelsl \lineskip 3pt 
611 \let\\=\cr 4% now the \\’s are line dividers 
612 \ifodd\pageno \halign{\line{\titlefont \hfil##}\\#4\unskip\\} 
613 \else\halign{\line{\titlefont ##\hfil}\\#4\unskip\\}\fi} 
614 \tenpoint 
615 \noindent \ignorespaces} 
616 \def\dct:#1:#2:#3:{\dtmp=\hsize \begindoublecolumns\hsize=\dtmp \divide\hsize by2 
617 \def\rhead{\firstmark\hfil{\tenit #1--#2 dictionary}\hfil\botmark} 
618 \def\leftheadline{\hbox to \pagewidth{\vbox to 10pt{}\llap{\tenbf\folio\kernipc}\tenbf\rhead}} 
619 \def\rightheadline{\hbox to \pagewidth{\vbox to 10pt{}\tenbf\rhead\rlap{\kern1lpc\tenbf\folio}}} 
620 \baselineskip.9em\parindent=0pt\eightpoint \input #3 
621 \enddoublecolumns\cut} 
622 \def\rightharpoonupfill{$\m@th\smash-\mkern-7mu/ 
623 \cleaders\hbox{$\mkern-2mu\smash-\mkern-2mu$}\hfill 
624 \mkern-7mu\mathord\rightharpoonup$} 
625 \def \overrightharpoonup#1{\vbox{\m@th\ialign{##\crer 
626 \rightharpoonupfill\crcer\noalign{\kern-\p@\nointerlineskip} 
627 $\hfil\displaystyle{#1}\hfil$\crcr}}} 
628 % \input grammar 
629 \input language 
630 \asl\bengali\chem\czech\daiy\deutsch\espanlol\francjais\gaelic\grammar\hindi\hungarian\lanna\latin\lating 
631 \math\money \nihongo\norge\pali\physics\polish\russian\sanskrit\serbo\slovak\vietnamese\zhongwen 
632 % edit index.tex -> dstidx.tex 
633 4% 1. replace _! by , 
634 % 2. append \begindoublecolumns\beginindex at top, and \endindex\enddoublecolumns at end 
635 % awk script 
636 % awk ’{printf("%d %s\n",NR,$0) ;}? tmp > tmpl 
637 % awk ’{for(i=1:i<=NR:it+) {for (j=2: j<=NF: j++) {printf ("%s",$j)}}}’? tmp > tmpi 
638 % \def\{$\aleph$} 
639 % sort ref.tex | awk ’{printf("\\def\\{/s\n",$0) ;}’? > tmpl 
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§ A.12 Language macros for TRX 


1 
2 
3 
4 
5 
6 
7 
8 


9 
10 
11 
12 
13 
14 
15 
16 
17 
18 
19 


\def \asl{\def\uq.{\d u} 


\def\oq.{\d o} 

\def\uoq. {\d uo} 

\def\iq.{\d i} 

\def\eq. {\d e} 

\def\ieq.{\d ie} 

\def\aq.{\d a} 

\def\aoq.{\d ao} 

\def\oaq.{\d oa} 

\def\uiq.{\d ui} 

\def\iuq.{\d iu} 

\def\ouq.{\d ou} 

\def\ueq. {\d ue} 

\def\oeq.{\d oe} 

\def\aeq.{\d ae} 

\def\euq.{\d eu} 

\def\iaq.{\d ia} 

\def\aqch.{\d ach} 
\def\aqcet.{\d act} 
\def\aqsp.{\d asp} 
\def\ogqss.{\d oss} 
\def\eqnt.{\d ent} 
\def\iqde.{\d ide} 
\def\igqnt.{\d int} 
\def\th.{\‘t} \def\Th. {\‘T} 
\def\tsh.{\‘ts} \def\Tsh. {\‘Ts} 
\def\tzh.{\‘tz} \def\Tzh. {\‘Tz} 
\def\bh.{\‘b} \def\Bh. {\‘B} 
\def\bsh.{\‘bs} \def\Bsh. {\‘Bs} 
\def\sh. {\‘s} \def\Sh.{\‘S} 
\def\ch.{\‘c} \def\Ch. {\‘C} 
\def\dh. {\‘s} \def\Dh. {\‘D} 
\def\fh.{\‘f} \def\Fh. {\‘F} 
\def\gh. {\‘g} \def\Gh. {\‘G} 
\def\gdh. {\‘ gd} \def\Gdh. {\‘ Gd} 
\def\hh. {\‘h} \def\Hh. {\‘H} 
\def\ jh {\‘\j} \def \Jh.{\‘ J} 
\def\kh. {\‘k} \def\Kh. {\‘K} 
\def\lh. {\‘1} \def\Lh. {\‘L} 
\def\zh. {\‘z} \def\Zh.{\‘Z} 
\def\ph.{\‘p} \def\Ph. {\‘P} 
\def\rh.{\‘r} \def\Rh.{\‘R} 
\def\vh.{\‘v} \def\Vh.{\‘V} 
\def\wh.{\‘w} \def\wh. {\‘w} 
\def\xh. {\‘x} \def\Xh. {\‘X} 
\def\yh.{\‘y} \def\Yh. {\‘Y} 
\def\ysh.{\‘ys} \def\Ysh. {\‘Ys} 
\def\qh. {\‘ a \def\Qh. {\‘Q} 
\def\tz.{\’t} \def\Tz.{\’T} 
\def\tsz.{\’ts} \def\Tsz. {\’Ts} 
\def\tzz.{\’tz} \def\Tzz.{\’Tz} 
\def\bz.{\’b} \def\Bz.{\’B} 
\def\bsz.{\’bs} \def\Bsz.{\’Bs} 
\def\sz.{\’s} \def\Sz.{\’S} 
\def\cz.{\’c} \def\Cz.{\’C} 
\def\dz.{\’s} \def\Dz.{\’D} 
\def\fz.{\’f} \def\Fz.{\’F} 
\def\gz.{\’g} \def\Gz. {\’ G} 
\def\gdz.{\’gd} \def\Gdz. {\’ Gd} 
\def\hz.{\’h} \def\Hz.{\’H} 
\def\jz.{\’ N } \def\Jz.{\’ J} 
\def\kz.{\’k} \def\Kz.{\’K} 
\def\lz.{\’1} \def\Lz.{\’L} 
\def\zz.{\’z} \def\Zz.{\’Z} 
\def\pz.{\’p} \def\Pz.{\’P} 
\def\rz.{\’r} \def\Rz.{\’R} 
\def\vz.{\’v} \def\Vz.{\’V} 
\def\wz.{\’w} \def\Wz.{\’?W} 
\def\xz.{\’x} \def\Xz.{\’?X} 
\def\yz.{\’y} \def\Yz.{\’Y} 
\def\ysz.{\’ys} \def\Ysz.{\’Ys} 
\def\qz.{\’q} \def\dz.{\'Q} 
\def\ty.{\"t} \def\Ty.{\°T} 
\def\tsy.{\"ts} \def\Tsy.{\*Ts} 
\def\tyy.{\"ty} Petes {\"Ty} 
\def\by.{\7b} \def\By.{ 
\def\bsy.{\"bs} \def\Bsy. He Bs} 
\def\sy.{\*s} \def\Sy.{\7S} 
\def\cy.{\*c} \def\Cy.{\*C} 


a 
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\def\dy.{\*s} \def\Dy.{\*D} 
\def\fy.{\°f} \def\Fy.{\"F} 
\def\gy.{\"g} \def\Gy.{\"G} 
\def\gdy.{\"gd} \def\Gdy. {\"Gd} 
\def\hy.{\"h} \def\Hy.{\"H} 
\def\jy.{\-\j} \def \Jy.{\7 J} 
\def\ky.{\"k} \def\Ky.{\7 
\def\ly.{\*1} \def\Ly. 
\def\yy.{\*y} \def\Yy. 
\def\py.{\*p} \def\Py. 
\def\ry.{\*r} \def\Ry. 
\def\vy.{\*v} \def\Vy. 
\def\wy.{\"w} \def\Wy. 
\def\xy. {\7x} eee 
\def\yy. {\"y} aa {\"¥} 

Ndat\ coe. {\-ys} \def\Ysy. {\"Ys} 
\def\qy.{\"q} \def\Qy.{\"Q} 
\def\tq.{\d t} \def\Tq.{\d T} 
\def\tsq.{\d ts} \def\Tsq.{\d Ts} 
\def\tqq.{\d tq} \def\Tqq.{\d Tq} 
\def\bq.{\d b} \def\Bq.{\d B} 
\def\bsq.{\d bs} \def\Bsq.{\d 
\def\sq.{\d s} \def\Sq.{\d 5} 
\def\cq.{\d c} \def\Cq.{\d C} 
\def\dq.{\d s} \def\Dq.{\d D} 
\def\fq.{\d f} \def\Fq.{\d F} 
\def\gq.{\d g} \def\Gq.{\d G} 
\def\gdq.{\d gd} \def\Gdq. {\d 
\def\hq.{\d h} \def\Hq.{\d H} 
\def\ ja. {\d \J, \def \Ja.\a DP 


we 
AAA 
wn 
> 
i 
i) 


Bs} 


Gd} 


\def\kq.{\d k 
\def\1q. {\d 
\def\qq. {\d 
\def\pq. {\d 
\def\rq. {\d 
\def\vq. {\d 


\def \Kq. {\d 
\def\Lq. {\d 
\de#\Qq.{\d 
\def\Pq. {\d 
\def \Rq. {\d 
\def\Vq. {\d 


tal 


\def \wq. {\d 
\def\xq. {\d \def \Xq. {\d 
\def\wq. {\d 
\def\yq.{\d y} \def\Yq.{\d Y} 
\def\ysq.{\d ys} \def\Ysq.{\d 
\def\qq.{\d q} \def\Qq.{\d Q} 
\def\byh. {\‘ by} \def\Byh. {\‘By} 
\def\tqy.{\d{\"t} \def\Tqy. {\d{\*T}}} 
\def\cniz.{cn\’\i} \def\Cniz.{Cn\’I} 
\def\mfiz.{mf\’\i} \def\Mfiz.{Mf\’I} 
\def\myah. {my\‘a} \def\Myah. {My\‘a} 
\def\myaz.{my\’a} \def\Myaz.{My\’a} 
\def\iqde.{\d ide} 
\def \vz1.{\’vl1} \def\Vz1.{\’V1} 
} 


\def \Wq. {\d 


Ys} 


\def \bengali{\def\aa.{\=a} \def\Aa. {\=A} 
\def\ii.{\=\i} \def\Ii.{\=I} 

\def \uu.{\=u} \def\Uu. {\=U} 
\def\rq.{\d r} \def\Rq.{\d R} 
\def\mq.{\d m} \def\Mq.{\d M} 
\def\hq.{\d h} \def\Hq.{\d H} 
\def\nx.{\.n} \def\Nx.{\.N} 
\def\nl.{\~n} \def\N1.{\7N} 
\def\tq.{\d t} \def\Tq.{\d T} 
\def\tqh.{\d th} \def\Tgh.{\d Th} 
\def\dq.{\d d} \def\Dq.{\d D} 

\def \dqh. {\d dh} \def\Dgh. {\d Dh} 
\def\nq.{\d n} \def\Nq.{\d N} 
\def\sz.{\’s} \def\Sz.{\’S} 

145 \def\sq.{\d s} \def\Sq.{\d S}} 

146 \def\chem{\def\fm[##1]{$\rm ##1$} 

147. \def\dgc{\hbox{$*\circ\hbox{C}$}}} 
148 \def\czech{\def\cz.{\’c} \def\Cz.{\’C} 
149 \def\yz.{\’y} \def\Yz.{\’ Y}} 

150 \def\daiy{\def\av.{\v a} \def\Av.{\v A} 
151 \def\ah.{\‘a} \def\Ah. {\‘A} 

152 \def\af.{\=a} \def\Af.{\=A} 

153 \def\az.{\’a} \def\Az.{\’A} 


154 \def\aq.{\d a} \def\Aq.{\d A} 
155 \def\aqv. {\d{\v a}} \def\Aqv.{\d{\v_ A}} 
156 \def\agh. {\d{\‘a}} \def\Agh. {\d{\‘A}} 


157 
158 
159 
160 
161 


\def\aqf.{\d{\=a}} \def\Aqf.{\d{\=A}} 
\def\aqz.{\d{\’a}} \def\Aqz.{\d{\’ A}} 
\def\iv.{\v\i} \def\Iv.{\v I} 
\def\ih. {\‘\i} \def\Ih. {\‘I} 
\def\if.{\=\i} \def\If.{\=I} 


162 
163 
164 
165 
166 
167 
168 
169 
170 
171 
172 
173 
174 
175 
176 
177 
178 
179 
180 
181 
182 
183 
184 
185 
186 
187 
188 
189 
190 
191 
192 
193 
194 
195 
196 
197 
198 
199 
200 
201 
202 
203 
204 
205 
206 
207 
208 
209 
210 
211 
212 
213 
214 
215 
216 
217 
218 
219 
220 
221 
222 
223 
224 
225 
226 
227 
228 
229 
230 
231 
232 
233 
234 
235 
236 
237 
238 
239 
240 
241 
242 
243 
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\def\iz.{\’\i} \def\Iz.{\’I} 
\def\iq.{\d i} \def\Iq.{\d I} 
\def\iqv. {\d{\v\i}} \def\Iqv.{\d{\v 1}} 
\def\igh. {\d{\‘\i}} \def\Igh. {\d{\‘I}} 
\def\igf.{\d{\=\i}} \def\Iqf. {\d{\=I}} 
\def\igz. {\d{\’\i}} \def\Iqz. {\d{\’?I}} 

\def \uev.{\v ue} \def\Uev.{\v Ue} 
\def\ueh.{\‘ue} \def\Ueh. {\‘ Ue} 
\def\uef.{\=ue} \def\Uef.{\=Ue} 
\def\uez.{\’ue} \def\Uez.{\’ Ue} 

\def\uge.{\d ue} \def\Uge.{\d Ue} 
\def\ugev.{\d{\v u}e} \def\Ugev.{\d{\v_ Use} 
\def\ugeh. {\d{\‘u}e} \def\Ugeh. {\d{\‘U}e} 
\def\ugef . {\d{\=u}e} \def\Ugef . {\d{\=U}e} 
\def\ugez. {\d{\’u}e} \def\Ugez. {\d{\’ U}e} 

\def\uv.{\v u} \def\Uv.{\v U} 

\def\uh. {\‘u} \def\Uh. {\‘U} 
\def\uf.{\=u} \def\Uf.{\=U} 
\def\uz.{\’u} \def\Uz.{\’U} 

\def\uq.{\d u} \def\Uq.{\d U} 
\def\uqv.{\d{\v u}} \def\Uqv.{\d{\v_ U}} 
\def\ugh. {\d{\‘u}} \def\Ugh. {\d{\‘U}} 
\def\ugqf.{\d{\=u}} \def\Uqf . {\d{\=U}} 
\def\uqz. {\d{\’u}} \def\Ugz. {\d{\’ U}} 

\def\ev.{\v e} \def\Ev.{\v E} 

\def\eh.{\‘e} \def\Eh. {\‘E} 
\def\ef.{\=e} \def\Ef.{\=E} 
\def\ez.{\’e} \def\Ez.{\’E} 
\def\eq.{\d e} \def\Eq.{\d E} 
\def\eqv. {\d{\v e}} \def\Eqv. {\d{\v_ E}} 
\def\eqh. {\d{\‘e}} \def\Egh. {\d{\‘E}} 
\def\eqf.{\d{\=e}} \def\Eqf . {\d{\=E}} 
\def\eqz.{\d{\’e}} \def\Eqz. {\d{\’E}} 

\def\aev.{\v ae} \def\Aev.{\v Ae} 
\def\aeh.{\‘ae} \def\Aeh. {\‘ Ae} 
\def\aef.{\=ae} \def\Aef.{\=Ae} 
\def\aez.{\’ae} \def\Aez.{\’ Ae} 

\def\aqe.{\d ae} \def\Age.{\d Ae} 
\def\agev.{\d{\v a}e} \def\Agev.{\d{\v A}e} 
\def\ageh. {\d{\‘a}e} \def\Aqeh. {\d{\‘ A}e} 
\def\agef.{\d{\=a}e} \def\Agef .{\d{\=A}e} 
\def\agez. {\d{\’a}e} \def\Aqez. {\d{\’ A}e} 

\def\ov.{\v 0} \def\Ov.{\v O} 

\def\oh.{\‘o} \def\Oh.{\‘0} 
\def\of.{\=o} \def\0f.{\=0} 
\def\oz.{\’o} \def\0z.{\’?0} 
\def\oq.{\d o} \def\0q.{\d 0} 
\def\oqv. {\d{\v o}} \def\Oqv.{\d{\v 0}} 
\def\ogh. {\d{\‘o}} \def\Ogh. {\d{\‘0}} 
\def\oqf .{\d{\=o}} \def\Ogf . {\d{\=0}} 
\def\oqz. {\d{\?o}} \def\oqz. {\d{\’ o}} 

\def\auv.{\v au} \def\Auv.{\v Au} 
\def\auh.{\‘au} \def\Auh. {\‘ Au} 
\def\auf.{\=au} \def\Auf.{\=Au} 
\def\auz.{\’au} \def\Auz. {\’ Au} 

\def\aqu.{\d au} \def\Aqu.{\d Au} 
\def\aquv.{\d{\v a}u} \def\Aquv.{\d{\v_ A}u} 
\def\aquh. {\d{\‘a}u} \def\Aquh. {\d{\‘A}u} 
\def\aquf.{\d{\=a}u} \def\Aquf.{\d{\=A}u} 
\def\aquz.{\d{\’a}u} \def\Aquz.{\d{\’ A}u} 

\def\oev.{\v oe} \def\Jev.{\v Je} 
\def\oeh.{\‘oe} \def\Oeh. {\‘0e} 
\def\oef.{\=oe} \def\Uef.{\=0e} 
\def\oez.{\’oe} \def\Nez.{\’ Je} 

\def\oge.{\d oe} \def\Oge.{\d Oe} 
\def\ogev.{\d{\v o}e} \def\Ogev.{\d{\v_ O}e} 
\def\ogeh. {\d{\‘o}e} \def\Oqgeh. {\d{\‘ O}e} 
\def\ogef.{\d{\=o}e} \def\Ogef.{\d{\=0}e} 
\def\ogez. {\d{\’o}e} \def\Ogez.{\d{\’ O}e} \def\oqeez.{\d{\’ o}ee} 

\def\iav.{\v\i a} \def\Iav.{\v Ia} 
\def\iah.{\‘\i a} \def\Iah. {\‘Ia} 
\def\iaf.{\=\i a} \def\Iaf.{\=Ia} 
\def\iaz.{\’\i a} \def\iaz.{\’\i a} 

\def\iqa.{\d ia} \def\Iqa.{\d Ia} 
\def\igav.{\d{\v\i}a} \def\Iqav.{\d{\v I}a} 
\def\igah. {\d{\‘\i}a} \def\Iqah. {\d{\‘I}a} 
\def\igaf.{\d{\=\i}a} \def\Iqaf. {\d{\=I}a} 
\def\igaz.{\d{\’\i}a} \def\Iqaz. {\d{\’?I}a} 

\def\uav.{\v ua} \def\Uav.{\v Ua} 
\def\uah.{\‘ua} \def\Uah. {\‘Ua} 
\def\uaf.{\=ua} \def\Uaf.{\=Ua} 
\def\uaz.{\’ua} \def\Uaz.{\’? Ua} 
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244 \def\uqa.{\d ua} \def\Uga.{\d Ua} 

245 \def\ugav.{\d{\v u}a} \def\Ugav.{\d{\v_ U}a} 
246 \def\ugah. {\d{\‘u}a} \def\Ugah. {\d{\‘U}a} 
247 \def\ugaf.{\d{\=u}a} \def\Ugaf.{\d{\=U}a} 
248 \def\ugaz.{\d{\’u}a} \def\Ugaz.{\d{\’ U}a} 
249 \def\oav.{\v oa} \def\Jav.{\v Oa} 

250 \def\oah.{\‘oa} \def\Qah. {\‘0a} 

251 \def\oaf.{\=oa} \def\Qaf.{\=0a} 

252 \def\oaz.{\’oa} \def\0az.{\’? 0a} 

253 \def\oqa.{\d oa} \def\Oqa.{\d Oa} 

254 \def\ogav.{\d{\v o}a} \def\Oqav.{\d{\v O}a} 
255 \def\oqah. {\d{\‘o}a} \def\Oqah. {\d{\‘O}a} 
256 \def\ogaf.{\d{\=o}a} \def\Oqgah. {\d{\=O}a} 
257 \def\ogaz. {\d{\’o}a} \def\Oqaz.{\d{\’ O}a} 
258 \def\amq.{a\d m} \def\Amq.{A\d m} 

259 \def\amqv.{\v a\d m} \def\Amqv.{\v A\d m} 
260 \def\amgh.{\‘a\d m} \def\Amgh.{\‘A\d m} \def\ammgh.{\‘a\d m\d{\"m}} 
261 \def\amqf.{\=a\d m} \def\Amqf.{\=A\d m} 
262 \def\amqz.{\’a\d m} \def\Amqz.{\’A\d m} 
263 \def\aiv.{\v ai} \def\aiv.{\v ai} 

264 \def\aih.{\‘ai} \def\aih. {\‘ai} 

265 \def\aif.{\=ai} \def\aif.{\=ai} 

266 \def\aiz.{\’ai} \def\aiz.{\’ai} 

267 \def\aiq.{a\d i} \def\Aqi.{\d Ai} 

268 \def\aiqv.{\v a\d i} \def\Aiqv.{\v A\d i} 
269 \def\aigh.{\‘a\d i} \def\Aigh.{\‘A\d i} 
270 \def\aigf.{\=a\d i} \def\Aigf.{\=A\d i} 
271 \def\aiqz.{\’a\d i} \def\Aiqz.{\’A\d i} 
272 \def\aov.{\v ao} \def\Aov.{\v Ao} 

273 \def\aoh.{\‘ao} \def\Aoh. {\‘ Ao} 

274 \def\aof.{\=ao} \def\Aof.{\=Ao} 

275 \def\aoz.{\’ao} \def\Aoz.{\’? Ao} 

276 \def\auqh.{\‘a\d u} \def\Augh.{\‘A\d u} 
277. \def\tq.{\d t} \def\Tq.{\d T} 

278 \def\tqh.{\d th} \def\Tqh.{\d Th} 

279 \def\kqh.{\d kh} \def\Kqh.{\d Kh} 

280 \def\gq.{\d g} \def\Gq.{\d G} 

281 \def\dq.{\d d} \def\Dq.{\d D} 

282 \def\dz.{\’d} \def\Dz.{\’D} 

283 \def\dqz. {\d{\’d}} \def\Dqz.{\d{\’?D}} 

284 \def\dqh. {\d dh} \def \Dqh. {\d Dh} 

285 \def\nq.{\d n} \def\Nq.{\d N} 

286 \def\bq.{\d b} \def\Bq.{\d B} 

287 \def\fq.{\d £} \def\Fq.{\d F} 

288 \def\hq.{\d h} \def\Hq.{\d H} 

289 \def\1lqq.{\d 1} \def\Lq.{\d L} 

290 \def\rq.{\d r} \def\Rq.{\d R} 

291 \def\sq.{\d s} \def\Sq.{\d 5} 

292 \def\yq.{\d y} \def\Yq.{\d_ Y} 

293 \def\lz.{\’?1} \def\Lz.{\’L} 

294 \def\sz.{\’s} \def\Sz.{\’S} 

295 \def\ae.{\"a} 

296 \def\bge. {\d{\"b}} 

297 \def \nge. {\"ng} 

298 \def\ke. {\"k} 

299 \def\ne. {\"n} 

300 \def\ye.{\"y} 

301 \def\ax.{\.a} \def\Ax.{\.A} 

302 \def \aux. {\.au} 

303 \def\aux.{\d{\.a}u} \def\Aux. {\d{\.A}u} 
304 \def \bx.{\.b} 

305 \def\bhx. {\.bh} 

306 \def\cx.{\.c} 

307. \def\dx.{\.d} 

308 \def\dhx.{\.dh} 

309 \def\dqhx. {\d{\.dh}} 

310 \def\dzx.{\’ dx} 

311 \def\fx.{\.f} 

312 \def\fqx. {\d{\.£}} 

313 \def\gx. {\.g} 

314 \def\ghx. {\. gh} 

315 \def \hx. {\.h} 

316 \def\hqx. {\d{\.h}} 

317 \def\kx.{\.k} 

318 \def\khx. {\.kh} 

319 \def\lx.{\.1} 

320 \def\mx. {\.m} 

321 \def\nx.{\.n} 

322 \def\ngx. {\d{\.n}} 

323 \def\px.{\.p} 

324 \def\rx.{\.r} 

325 \def\sx.{\.s} 


326 
327 
328 
329 
330 
331 
332 
333 
334 
335 
336 
337 
338 
339 
340 
341 
342 
343 
344 
345 
346 
347 
348 
349 
350 
351 
352 
353 
354 
355 
356 
357 
358 
359 
360 
361 
362 
363 
364 
365 
366 
367 
368 
369 
370 
371 
372 
373 
374 
375 
376 
377 
378 
379 
3380 
381 
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\def\sqx. {\d{\.s}} 
\def \szx. {\d{\’s}} 
\def\tx.{\.t} 

\def \thx. {\. th} 
\def\tqx. {\d{\.t}} 
\def\tqhx. {\d{\.th}} 
\def\vx.{\. 7 
\def\yx.{\. 

\def \yaz. Aad. yt} 
\def \zx.{\.z}} 


\def \deutsch{\def\acc{{\it acc}} 
\def\dat{{\it dat}} 
\def\eie{{\it e-e}} 
\def\eim{{\it e-m}} 
\def\eir{{\it e-r}} 
\def\etw{{\it et}} 
\def\gen{{\it gen}} 
\def\jm{{\it jm}} 
\def\jn{{\it jn}} 
\def\ohn{{\it ohn. }} 
\def\Ae.{\"A} \def\ae.{\"a} 
\def\0e.{\"0} \def\oe.{\"o} 
\def\Ue.{\"U} \def\ue.{\"u} 
\def\Ss.{\ss }} 
\def \espanlol{\def\nl.{\n} \def\N1.{\"N}} 
\def\francjais{\def\qch{{\it q.ch.}} 
\def \Az.{\’A} \def\az.{\’a} 
\def\Ez.{\’E} \def\ez.{\’e} 
\def\Ah.{\‘A} \def\ah.{\‘a} 
\def\Eh.{\‘E} \def\eh.{\‘e} 
\def \Ey.{\"E} \def\ey.{\7e} 
\def\Iy.{\7I} \def\iy.{\7\i} 
\def\Ie.{\"I} \def\ie.{\"\i}} 
\def \gaelic{\def\ah.{\‘a} \def\Ah. {\’ A} 
\def\eh.{\‘e} \def\Eh.{\’E} 
\def\ih. {\‘\i} \def\Ih. {\‘I} 
\def \oh.{\‘o} \def\Oh.{\‘0} 
\def\uh.{\‘u} \def\Uh. {\‘U}} 
\def \grammar{\def\ab{{\it abrv}} 
\def \adv{{\it adv}} 
\def\adj{{\it adj}} 
\def\ant{{\it ant}} 4 antonym 
\def\arcc{{\it archaic}} 
\def\atb{{\it atrib}} % attributive noun 
\def\auxi{{\it aux}} 4 auxiliary 
\def\brit{{\it Brit.}} % British 
\def\cca{{\it circa}} 
\def\cf{{\it cf}} 
\def\chem{{\it chem}} 4% chemistry 
\def\chss{{\it chess}} % chess 
\def\cj{{\it conj}} 4 conjunction 
\def\clfr{{\it classf}}% classifier 
\def\col{{\it col}} 4 colloquial 
\def\cor{{\it corrupt}} % corrupted 
\def \dd{$\ldots $} 
\def\de{{\it derog}} 4 derogatory 
\def\det{{\it det}} %, determiner 


\def\dtof{{\it ditto}} 
\def\dy{{\it dy}} 4 daiy 
\def\eg{{\it eg}} 4 exempli gratia 


\def\esp{{\it esp}} 
\def\etc{{\it etc}} 


\def\et1{{\it et al}} 

\def\expr{{\it expr}} 4 expression 
\def\f{{\it f}} ¥, feminine 
\def\figu.{{\it fig}} 4 figurative 
\def\fml{{\it fm1}} %, formal 
\def\Fr{{\it Fr.}} %, french 
\def\ger{{\it Ger.}} 4 german 
\def\gram{{\it gram}} 

\def\grk{{\it Gr.}} 


\def \humou{{\it humour. }} 
\def\ie{{\it i.e.}} \def\idst{{\it i.e.}} % id est 


\def\ifm{{\it infml1}} % informal 
\def\inj{{\it intj}} 4 interjection 
\def\joc{{\it joc}} 4 jocular 
\def\lan{{\it Lan. }} % lanna 
\def\lat{{\it Lat}.} %, latin 
\def\law{{\it law}} 4 law jargon 
\def\lo{{\it loc}} %, local 


\def\1t{{\it 1it}} 


4 literally 
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408 \def\m{{\it m}} %, masculine 

409 \def\mat{{\it math}} 

410 \def\matl{{\it mat}} %, material science 
411 \def\med{{\it med}} %, medicine 

412 \def\mil{{\it mil}} 4 military 

413 \def\mo{{\it mod}} %, modal 

414 \def\mt{{\it m\d oay}} 4 moaydaiy 

415 \def\n{{\it n}} % noun 


ws 


416 \def\nt{{\it nt}} neutrum 

417 \def\nym{{\it acronym}} 

418 \def\ob{{\it obs}} 4, obsolete 

419 \def\on{{\it ono}} 4% onomatopoeia 
420 \def\os{{\it o.s.}} 

421 \def\prp{{\it prp}} 

422 \def\pa{{\it Pa. }} 4 pali 

423 \def\part{{\it part}} % participle 
424 \def\pl{{\it p1}} 4 plural 

425 \def\pn{{\it pn}} 4 pronoun 


426 \def\ppt{{\it pres. part. }} 4 present participle 
427 \def\pres{{\it pres}} % present 

428 \def\prs{{\it prs}} 4 prose 

429 \def\prf{{\it prf}} 4 prefix 

430 \def\ged{{\it q.e.d.}} % quod erat demonstrandum, which was to be proved 
431 \def\qntf{{\it quantf}}% quantifier 
432 \def\rad{{\it rad}} %, radical 

433 \def\refl{{\it refl}} % reflexive 

434 \def\rh{{\it rhe}} 4, rhetoric 

435 \def\rp{\lower4pt\hbox{{\tenrm\~{}}}\raise4pt\hbox{}} 
436 \def\sb{{\it sb}} 

437 \def\sfx{{\it sfx}} 

438 \def\sic{{\ninepoint [sic]}} 

439 \def\sk{{\it Sk.}} % sanskrit 

440 \def\slng{{\it s1}} 4 slang 

441 \def\sng{{\it sing}} 

442 \def\st{{\it sth}} 

443 \def\dai{{\it Th.}} % thai 

444 \def\theor{{\it theor}}% theoretically 
445 \def\us{{\it usu}} 

446 \def\vb{{\it v}} 

447 \def\viz{{\it viz.}} % videlicet 

448 \def\vs{{\it vs}} 

449 \def\vul{{\it vul}} 4 vulgar 

450 

451 \def\hindi{\def\aa.{\=a} \def\Aa. {\=A} 
452 \def\ii.{\=\i} \def\Ii.{\=I} 

453 \def\uu.{\=u} \def\Uu. {\=U} 

454 \def\rq.{\d r} \def\Rq.{\d R} 

455 \def\nx.{\.n} \def\Nx.{\.N} 

456 \def\nl.{\"n} \def\N1.{\~N} 

457 \def\nq.{\d n} \def\Nq.{\d N} 

458 \def\sz.{\’s} \def\Sz.{\’S} 

459 \def\sq.{\d s} \def\Sq.{\d S} 

460 \def\kq.{\d k} \def\Kq.{\d K} 

461 \def\kqh.{\d kh} \def\Kqh.{\d Kh} 

462 \def\gq.{\d g} \def\Gq.{\d G} 

463 \def\rq.{\d r} \def\Rq.{\d R} 

464 \def\rqh.{\d rh} \def\Rqh.{\d Rh}} 

465 \def\hungarian{\def\az.{\’a} \def\Az.{\’ A} 
466 \def\ez.{\’e} \def\Ez.{\’E} 

467 \def\iz.{\’\i} \def\Iz.{\’I} 

468 \def\oe.{\"o} \def\0e.{\"0} 

469 \def\ow.{\H o} \def\Ow.{\H 0} 

470 \def\uz.{\’u} \def\Uz.{\’U} 

471 \def\ue.{\"u} \def\Ue.{\"U} 

472 \def\uw.{\H u} \def\Uw.{\H U}} 

473 \def\lanna{\def\av.{\v a} \def\Av.{\v A} 
474 \def\ah.{\‘a} \def\Ah. {\‘A} 

475 \def\ay.{\*a} \def\Ay.{\7A} 

476 \def\af.{\=a} \def\Af.{\=A} 

477 \def\az.{\’a} \def\Az.{\’A} 

478 \def\aq.{\d a} \def\Aq.{\d A} 

479 \def\aqv.{\d{\v a}} Naas \hav: {\d{\v A}} 
480 \def\agh. {\d{\‘a}} \def\Aqh. {\d{\‘A}} 
481 \def\aqy.{\d{\*a}} \def\Aqy. {\d{\*A}} 
482 \def\aqf.{\d{\=a}} \def\Aqf.{\d{\=A}} 
483 \def\aqz. {\d{\’a}} \def\Aqz.{\d{\’ A}} 
484 \def\iv.{\v\i} \def\Iv.{\v I} 

485 \def\ih. {\‘\i} \def\Ih. {\‘ I} 

486 \def\iy.{\7\i} \def\Iy.{\71} 

487 \def\if.{\=\i} \def\If.{\=I} 

488 \def\iz.{\’\i} \def\Iz.{\’I} 

489 \def\iq.{\d i} \def\Iq.{\d I} 


490 
491 
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493 
494 
495 
496 
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\def\iqv. {\d{\v\i}} \def\Iqv.{\d{\v 1}} 
\def\igh. {\d{\‘\i}} \def\Igh. {\d{\‘I}} 
\def\iqy.{\d{\*\i}} \def\Iqy. {\d{\"I}} 
\def \igf . {\d{\=\i}} \def \Iqf . {\d{\=1}} 
\def\iqz.{\d{\’\i}} \def\Iqz. {\d{\’?I}} 

\def\uev.{\v ue} \def\Uev.{\v Ue} 
\def\ueh.{\‘ue} \def\Ueh. {\‘ mee 
\def\uey.{\"ue} \def\Uey.{\"Ue} 
\def\uef.{\=ue} \def\Uef.{\=Ue} 
\def\uez.{\’ue} \def\Uez. {\’ Ue} 

\def\uge.{\d ue} \def\Uge.{\d Ue} 
\def\ugev. {\d{\v u}e} \def\Ugev. {\d{\v_ Use} 
\def\ugeh. {\d{\‘u}e} \def\Ugeh. {\d{\‘U}e} 
\def\ugey. {\d{\"u}e} \def\Ugey.{\d{\"U}e} 
\def\ugef.{\d{\=u}e} \def\Ugef .{\d{\=U}e} 
\def\ugez. {\d{\’u}e} \def\Ugez. {\d{\’ U}e} 

\def\uv.{\v u} \def\Uv.{\v U} 
\def\uh.{\‘u} \def\Uh. {\‘U} 

\def\uy.{\*u} \def\Uy.{\"U} 
\def\uf.{\=u} \def\Uf.{\=U} 
\def\uz.{\’u} \def\Uz.{\’U} 

\def\uq.{\d u} \def\Uq.{\d U} 
\def\uqv.{\d{\v u}} \def\Uqv.{\d{\v_ U}} 
\def\ugh. {\d{\‘u}} \def\Ugh. {\d{\‘U}} 
\def\uqy. {\d{\"u}} \def\Ugy. {\d{\"U}} 
\def\uqf.{\d{\=u}} \def\Ugf . {\d{\=U}} 
\def\uqz. {\d{\’u}} \def\Uqz. {\d{\’? U}} 

\def\ev.{\v e} \def\Ev.{\v E} 
\def\eh.{\‘e} \def\Eh. {\‘E} 

\def\ey.{\*e} \def\Ey.{\"E} 
\def\ef.{\=e} \def\Ef.{\=E} 
\def\ez.{\’e} \def\Ez.{\’E} 
\def\eq.{\d e} \def\Eq.{\d E} 
\def\eqv. {\d{\v e}} \def\Eqv. {\d{\v_ E}} 
\def\eqgh. {\d{\‘e}} \def\Eqh. {\d{\‘E}} 
\def\eqy.{\d{\"e}} \def\Eqy. {\d{\*E}} 
\def \eqf.{\d{\=e}} \def\Eqf . {\d{\=E}} 
\def\eqz. {\d{\’e}} \def\Eqz. {\d{\’E}} 

\def\aev.{\v ae} \def\Aev.{\v Ae} 
\def\aeh.{\‘ae} \def\Aeh. {\‘ Ae} 
\def\aey.{\"ae} \def\dey. {\" Ae} 
\def\aef.{\=ae} \def\Aef.{\=Ae} 
\def\aez.{\’ae} \def\Aez.{\’ Ae} 

\def\aqe.{\d ae} \def\Age.{\d Ae} 
\def\agev.{\d{\v a}e} \def\Agev.{\d{\v A}e} 
\def\ageh. {\d{\‘a}e} \def\Aqeh. {\d{\‘ A}e} 
\def\agey.{\d{\*a}e} \def\Agey. {\d{\*A}e} 
\def\agef.{\d{\=a}e} \def\Agef .{\d{\=A}e} 
\def\agez.{\d{\’a}e} \def\Aqez. {\d{\’ A}e} 

\def\ov.{\v o} \def\Ov.{\v O} 
\def\oh.{\‘o} \def\Oh. {\‘0} 

\def\oy.{\*o} \def\Oy.{\70} 
\def\of.{\=o} \def\0f .{\=0} 
\def\oz.{\’o} \def\0z.{\’?0} 

\def\oq.{\d 0} \def\0q.{\d 0} 
\def\oqv.{\d{\v o}} \def\Oqv.{\d{\v_ 0}} 
\def\ogh. {\d{\‘o}} \def\Oqh. {\d{\‘0}} 
\def\oqy. {\d{\"o}} \def\Oqy. {\d{\"0}} 
\def\oqf.{\d{\=o0}} \def\Oqf.{\d{\=0}} 
\def\oqz. {\d{\’0}} \def\oqz. {\d{\’ o}} 

\def\ouv.{\v ou} \def\Ouv.{\v Ou} 
\def\ouh.{\‘ou} \def\Ouh. {\‘ Ou} 
\def\ouy.{\*ou} \def\Quy. {\7Ou} 
\def\ouf.{\=ou} \def\Ouf.{\=0u} 
\def\ouz.{\’ou} \def\Ouz. {\’ Ou} 

\def\ouq.{o\d u} \def\Ouq.{0\d u} 
\def\ouqv.{\v o\d u} \def\Ouqv.{\v O\d u} 
\def\ough.{\‘o\d u} \def\Ough.{\‘O\d u} 
\def\ouqy.{\7o\d u} \def\Ouqy.{\70\d u} 
\def\ougf.{\=o\d u} \def\Quqf.{\=0\d u} 
\def\ouqz.{\’o\d u} \def\ouqz.{\’o\d u} 

\def\oqu.{\d ou} \def\Qqu.{\d Ou} 
\def\oquv.{\d{\v o}u} \def\Oquv.{\d{\v O}u} 
\def\oquh. {\d{\‘o}u} \def\Oquh. {\d{\‘0}u} 
\def\oquy.{\d{\*o}u} \def\Oquy. {\d{\*0}u} 
\def\oquf.{\d{\=o}u} \def\Oquf.{\d{\=0}u} 
\def\oquz. {\d{\’o}} \def\oquz. {\d{\’ o}u} 

\def\auv.{\v au} \def\Auv.{\v Au} 
\def\auh.{\‘au} \def\Auh. {\‘ Au} 
\def\auy.{\"au} \def\Auy. {\*Au} 
\def\auf.{\=au} \def\Auf.{\=Au} 
\def\auz.{\’au} \def\Auz. {\’ Au} 
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572 \def\auq.{a\d u} \def\Auq.{A\d u} 

573 \def\auqv.{\v a\d u} \def\Auqv.{\v A\d u} 
574 \def\augh.{\‘a\d u} \def\Augh.{\‘A\d u} 

575 \def\auqy.{\*a\d u} \def\Augqy.{\7A\d u} 

576 \def\auqf.{\=a\d u} \def\Augf.{\=A\d u} 

577 \def\auqz.{\’a\d u} \def\Auqz.{\’A\d u} 

578 \def\aqu.{\d au} \def\Aqu.{\d Au} 

579 \def\aquv.{\d{\v a}u} \def\Aquv.{\d{\v_ A}u} 
580 \def\aquh. {\d{\‘a}u} \def\Aquh. {\d{\‘ A}u} 
581 \def\aquy.{\d{\*a}u} \def\Aquy. {\d{\*A}u} 
582 \def\aquf.{\d{\=a}u} \def\Aquf.{\d{\=A}u} 
583 \def\aquz.{\d{\’a}u} \def\Aquz.{\d{\? A}u} 
584 \def\aiv.{\v ai} \def\aiv.{\v ai} 

585 \def\aih.{\‘ai} \def\aih. {\‘ai} 

586 \def\aiy.{\"ai} \def\aiy. {\"ai} 

587 \def\aif.{\=ai} \def\aif.{\=ai} 

588 \def\aiz.{\’ai} \def\aiz.{\’ai} 

589 \def\aov.{\v ao} \def\Aov.{\v Ao} 

590 \def\aoh.{\‘ao} \def\Aoh. {\‘ Ao} 

591 \def\aoy.{\"ao} \def\Aoy. {\*Ao} 

592 \def\aof.{\=ao} \def\Aof.{\=Ao} 

593 \def\aoz.{\’ao} \def\Aoz.{\’ Ao} 

594 \def\amq.{a\d m} \def\Amq.{A\d m} 

595 \def\amqv.{\v a\d m} \def\Amqv.{\v A\d m} 
596 \def\amgh.{\‘a\d m} \def\Amgh.{\‘A\d m} 

597 \def\amqy.{\7a\d m} \def\Amqy.{\7A\d m} 

598 \def\amqf.{\=a\d m} \def\Amqf.{\=A\d m} 

599 \def\amqz.{\’a\d m} \def\Amqz.{\’A\d m} 

600 \def\oav.{\v oa} \def\Jav.{\v Oa} 

601 \def\oah.{\‘oa} \def\Qah. {\‘0a} 

602 \def\oay.{\*oa} \def\Qay. {\*0a} 

603 \def\oaf.{\=oa} \def\Oaf.{\=0a} 

604 \def\oaz.{\’oa} \def\Oaz.{\’ 0a} 

605 \def\oqa.{\d oa} \def\Oqa.{\d Oa} 

606 \def\oqav.{\d{\v o}a} \def\Oqgav.{\d{\v O}a} 
607 \def\oqah. {\d{\‘o}a} \def\Oqah. {\d{\‘O}a} 
608 \def\ogay. {\d{\*o}a} \def\Oqgay.{\d{\*O}a} 
609 \def\ogaf.{\d{\=o}a} \def\Oqgah. {\d{\=O}a} 
610 \def\oqaz.{\d{\’o}a} \def\Oqaz.{\d{\’ 0}a} 
611 \def\iav.{\v\i a} \def\Iav.{\v Ia} 

612 \def\iah.{\‘\i a} \def\Iah. {\‘Ia} 

613 \def\iay.{\"\i a} \def\Iay.{\"Ia} 

614 \def\iaf.{\=\i a} \def\Iaf.{\=Ia} 

615 \def\iaz.{\’\i a} \def\iaz.{\’\i a} 

616 \def\iqa.{\d ia} \def\Iqa.{\d Ia} 

617 \def\igav. {\d{\v\i}a} \def\Iqav.{\d{\v I}a} 
618 \def\igah. {\d{\‘\i}a} \def\Iqah. {\d{\‘I}a} 
619 \def\igay.{\d{\*\i}a} \def\Iqay. {\d{\*I}a} 
620 \def\igaf.{\d{\=\i}a} \def\Iqaf. {\d{\=I}a} 
621 \def\igaz.{\d{\’\i}a} \def\Iqaz. {\d{\’ I}a} 
622 \def\iaq.{i\d a} \def\Iaq.{I\d a} 

623 \def\iaqv. {\v\i\d a} \def\Iaqv.{\v I\d a} 
624 \def\iagh.{\‘\i\d a} \def\Iaqh.{\‘I\d a} 
625 \def\iaqy.{\7\i\d a} \def\Iaqy.{\7I\d a} 
626 \def\iagf.{\=\i\d a} \def\Iaqf.{\=I\d a} 
627 \def\iaqz.{\’\i\d a} \def\Iaqz.{\’I\d a} 
628 \def\iqaq.{\d i\d a} \def\Iqaq.{\d I\d a} 
629 \def\igaqv.{\d{\v\i}\d a} \def\Iqaqv.{\d{\v I}\d a} 
630 \def\igagh.{\d{\‘\i}\d a} \def\Iqagh.{\d{\‘I}\d a} 
631 \def\igagy.{\d{\*\i}\d a} \def\Iqaqy.{\d{\*I}\d a} 
632 \def\igagf.{\d{\=\i}\d a} \def\Iqaqf.{\d{\=I}\d a} 
633 \def\igagqz.{\d{\’\i}\d a} \def\Iqaqz.{\d{\’I}\d a} 
634 \def\oev.{\v oe} \def\Jev.{\v Oe} 

635 \def\oeh.{\‘oe} \def\Oeh. {\‘0e} 

636 \def\oey.{\*oe} \def\Jey. {\*Ne} 

637 \def\oef.{\=oe} \def\Jef.{\=0e} 

638 \def\oez.{\’oe} \def\Oez.{\’ Je} 

639 \def\oge.{\d oe} \def\Oge.{\d Je} 

640 \def\ogev.{\d{\v o}e} \def\Ogev.{\d{\v O}e} 
641 \def\ogeh. {\d{\‘o}e} \def\Oqgeh. {\d{\‘ O}e} 
642 \def\ogey.{\d{\*o}e} \def\Ogey.{\d{\*O}e} 
643 \def\ogef. {\d{\=o}e} \def\Ogef .{\d{\=O}e} 
644 \def\ogez.{\d{\’o}e} \def\Ogez.{\d{\’ O}e} 
645 \def\uav.{\v ua} \def\Uav.{\v Ua} 

646 \def\uah.{\‘ua} \def\Uah. {\‘Ua} 

647 \def\uay.{\"ua} \def\Uay. {\"Ua} 

648 \def\uaf.{\=ua} \def\Uaf.{\=Ua} 

649 \def\uaz.{\’ua} \def\Uaz. {\’ Ua} 

650 \def\uga.{\d ua} \def\Uga.{\d Ua} 

651 \def\ugav.{\d{\v u}a} \def\Ugav.{\d{\v U}a} 
652 \def\uqah. {\d{\‘u}a} \def\Uqah. {\d{\‘U}a} 
653 \def\ugay. {\d{\*u}a} \def\Ugay. {\d{\*U}a} 


654 
655 
656 
657 
658 
659 
660 
661 
662 
663 
664 
665 
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672 
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693 
694 
695 
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\def\ugaf.{\d{\=u}a} \def\Ugaf.{\d{\=U}a} 
\def\ugaz.{\d{\’u}a} \def\Ugaz.{\d{\’ U}a} 
\def\tq.{\d t} \def\Tq.{\d T} 

\def\tqh.{\d th} \def\Tqh.{\d Th} 
\def\dq.{\d d} \def\Dq.{\d D} 

\def\dqh -{\d dh} \def \Dgh .{\d Dh} 
\def\nq.{\d n} \def\Nq.{\d N} 

\def\yq.{\d y} \def\Yq.{\d Y} 
\def\sz.{\’s} \def\Sz.{\’S} 

\def\1lqq. {\d 1} \def\Lq.{\d L} 
\def\anqg.{a\d ng} \def\Angg.{A\d ng} 
\def\angq.{an\d g} \def\Angq.{An\d g} 
\def\hq.{\d h} \def\Hq.{\d H} 
\def\yz.{\’y} \def\Yz.{\’Y} 

\def\yqb. {\d{\‘y}} \def \Yqb. {\a{\¥}} 
\def\jhb.{\‘\j h} \def\Jhb. {\‘ Jh} 
\def\tqhb. {\d{\‘t}h} \def\Tqhb. {\d{\‘T}h} 
\def\nb.{\‘n} \def\Nb. {\‘N} 

\def\pb.{\‘p} \def\Pb. {\‘P} 
\def\phb.{\‘ph} \def\Phb. {\‘Ph} 
\def\bb.{\‘b} \def\Bb. {\‘B} 

\def\mb.{\‘m} \def\Mb. {\‘M} 

\def\iga.{\d ia} \def\Iqa.{\d Ia} 
\def\1lb.{\‘1} \def\Lb. {\‘L} 

\def\sb.{\‘s} \def\Sb.{\‘S} 

\def\na.{na} \def\Na. {Na} 

\def\yb.{\‘y} \def\Yb. {\‘Y} 

\def\pq.{\d p} \def\Pq.{\d P} 

\def\fq.{\d f} \def\Fq.{\d F} 
\def\ax.{\.a} \def\Ax.{\.A}} 

\def \latin{\def\Af.{\=A} \def\af.{\=a} 
\def\Ef.{\=E} \def\ef.{\=e} 
\def\If.{\=I} \def\if.{\=\i} 
\def\0f.{\=0} \def\of .{\=o} 

\def \aa.{\=a} \def\da.{\=A} 
\def\ee.{\=e} \def\Ee.{\=E} 
\def\ii.{\=\i} \def\Ii.{\=I} 
\def \oo.{\=o} \def\0o.{\=0} 
\chardef \aE="1A 
\chardef \oE="1B 
\def\Aee.{\AE } \def\aee.{\aE } 
\def\Oee.{\OE } \def\oee.{\oE }} 
\def \lating{\def \ [##1]{{\it ##1}} \def\(##1) {{\bf ##1}} \def\und{{\eightrm”and~}} 


696 
697 \def\nm{{\eightit nom.}} \def\vo{{\eightit voc.}} \def\ac{{\eightit acc.}} \def\gn{{\eightit 
en. }} 
es \def\dat{{\eightit dat.}} \def\ab{{\eightit abl.}} \def\sg{{\eightit sg.}} \def\pl{{\eightit 
1.}} 
ae \def \nmsg##1:{{\eightit nom.sg.} \(##1)} \def\vosg##1:{{\eightit voc.sg.} \(##1)} 
700 \def\acsg##1:{{\eightit acc.sg.} \(##1)} \def\gnsg##1:{{\eightit gen.sg.} \(##1)} 
701 \def\dtsg##1:{{\eightit dat.sg.} \(##1)} \def\absg##1:{{\eightit abl.sg.} \(##1)} 
702 \def\nmpl##1:{{\eightit nom.pl.} \(##1)} \def\vopl##1:{{\eightit voc.pl.} \(##1)} 
703 \def\acpl##1:{{\eightit acc.pl.} \(##1)} \def\gnpl##1:{{\eightit gen.pl.} \(##1)} 
704 \def\dtpl##1:{{\eightit dat.pl.} \(##1)} \def\abpl##1:{{\eightit abl.pl.} \(##1)} 
705 \def\dif [##1]{##1\[a], ##1\[am], ##1\[ae], ##1\[ae], ##1\[\af.], 
706 ##1\(ae), ##1\(\af.s), ##1\(\af.rum), ##1\(\if.s), ##1\(\if.s)} 
707 \def\diim[##1] {##1\[us], ##1\[um], ##1\[\if.], ##1\[\of.], ##1\[\of.], 
708 #H#1\(\if.), ##1\C\of.s), ##1\(\of.rum), ##1\(\if.s), ##1\(\if.s)} 
709 \def\diima[##1]{\sg\nm\ ##1\[us], \vo\ ##1\[e], \ac\ ##1\[um], \gn\ ##1\[\if.], \dt\ ##1\[\of.], 


0 


\ab\ ##1\[\of.], \pl\nm\und\vo\ ##1\(\if.), \ac\ ##1\(\of.s), \gn\ ##1\(\of.rum), \dt\und\ab\ 


71 
##1\(\if.s)} 


711 
712 
713 
714 
715 


\def \diin[##1]{##1\[um], ##1\[um], ##1\[\if.], ##1\[\of.], ##1\[\of.], 

##1\(a), ##1\(a), ##1\(\of.rum), ##1\(\if.s), ##1\(\if.s)} 

\def \diif [##1] {##1\[er], ##1\[erum], ##1\[r\if.], ##1\[Er\of.], ##1\[Er\of.], 
##1\(r\if.), ##1\(r\of.s), ##1\(r\of.rum), ##1\(r\if.s), ##1\(r\if.s)} 
\def\diiia:##1[##2]{\sg\nm\und\vo\ ##1, \ac\ ##2\[em], \gn\ ##2\[is], \dt\ ##2\[\if.], 


\ab\ ##2\[e], 


716 
717 
718 
719 
720 
721 
722 
723 
724 
725 
726 
727 
728 
729 
730 
731 


\pl\nm, \vo\und\ac\ ##2\[\ef.s], \gn\ ##2\[um], \dt\und\ab\ ##2\[ibus]}} 
\def\math{\def\bap{\bigcap} \def\bcp{\bigcup} 
\def \I{\hbox{I}} 
\def \rar{\rightarrow} 
\def \e: ##1x##2 [##3]{\hbox{$##1\times ##2°{##3}$}} 
\def\C (##1, ##2) {{}°{##1}\hbox{C}_{##2}} 
\def\Cc (##1,##2) {\pmatrix{##1\cr##2}} 
\def\det | ##1| {\left\vert \matrix{##1}\right \vert} 
\def \eno (##1) {\eqno{(##1)}} \def\eln{\eqalign} \def\elno{\eqalignno} 
\def \B [##1] {\hbox {##1}} 
\def\mtx [##1] {\left [\matrix{##1}\right] } 
\def\vtr (##1:##2:##3] {##1_{##2}, \ldots, ##1_{##3}} 
\outer\def\plm ##1.##2\par{\medbreak 
\noindent {\bf##1.\enspace}{\s1##2\par} 
\ifdim\lastskip<\medskipamount \removelastskip\penalty55\medskip\fi} 
\def \Ar{\bar{A}} \def\dr{\bar{d}} \def\fr{\bar{f}} \def\nr{\bar{n}} \def\ur{\bar{u}} \def\xr{\bar{x}} 
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732 
733 
734 
735 
736 
737 
738 
739 
740 
741 
742 
743 
744 
745 
746 
TAT 
748 
749 
750 
751 
752 
753 
754 
755 
756 
757 
758 
759 
760 
761 
762 
763 
764 
765 
766 
767 
768 
769 
770 
771 
772 
773 
774 
775 
776 
777 
778 
779 
780 
781 
782 
783 
784 
785 
786 
787 
788 
789 
790 
791 
792 
793 
794 
795 
796 
797 
798 
799 
800 
801 
802 
803 
804 
805 
806 
807 
808 
809 
810 
811 
812 
813 


\def\yr{\bar{y}} \def\zr{\bar{z}} 

\def\Ab{{\bf A}} \def\bb{{\bf b}} \def\Bb{{\bf B}} \def\Cb{{\bf C}} \def\Db{{\bf S}} 
\def\Eb{{\bf E}} \def\Ib{{\bf I}} \def\Pb{{\bf P}} \def\rb{{\bf r}} \def\Tb{{\bf T}} 
\def\ub{{\bf u}} \def\xb{{\bf x}} \def\yb{{\bf y}} 

\def\xbh{\hat{\bf x}} 

\def\sd{\dot{s}} \def\Vd{\dot{V}} \def\xd{\dot{x}} \def\yd{\dot{y}} \def\zd{\dot {z}} 
\def \xbd{\dot{\xb}} 

\def\aht{\hat{a}} \def\bht{\hat{b}} \def\cht{\hat{c}} 

\def\thb{{\bf\theta}} \def\thh{\hat{\theta}} 

\def\thbh{\hat{\bf\theta}} \def\xibh{\hat{\bf\xi}} 

\def \Nm{{\rm N}} \def\Tm{{\rm T}} \def\Zm{{\rm Z}} 

\def\fan{{\rm f}} 

\def\p{\prime} \def\pp{{\prime\prime}} \def\ppp{{\prime\prime\prime}} 

\def \alp{\aleph} 

\def \and{\hbox{and}} 
\def\aph{\alpha} \def\Aph{\Alpha} 
\def\apx{\approx} 

\def \bdb1{\begindoublecolumns } 

\def \bta{\beta} 

\def\bo{\cal 0} 

\def\cdt{\cdot} \def\cds{\cdots} 
\def\cir{\circ} 

\def \dg{\hbox{$*\circ$}} 
\def\dlt{\delta} \def\D1t{\Delta} 
\def \edb1{\enddoublecolumns} 
\def\eightp{\eightpoint} 
\def\ems{\emptyset } 
\def\epn{\epsilon} \def\Epn{\Epsilon} 
\def \f11{\forall} 

\def \fnt{\footnote} 
\def\gmm{\gamma} \def\Gmm{\Gamma} 
\def\iny{\infty} 
\def\itg{\intop\nolimits} 
\def\ity{\infty} 

\def \kpa{\kappa} 

\def\lds{\ldots} 
\def\llr{\longleftrightarrow} \def\Llr{\Longleftrightarrow} 
\def\lmd{\lambda} \def\Lmd{\Lambda} 
\def\1ng{\langle} 
\def\lra{\leftrightarrow} \def\Lra{\Leftrightarrow} 
\def\lrw{\longrightarrow} \def\Lrw{\Longrightarrow} 
\def \nind{\noindent} 
\def\ninep{\ninepoint} 
\def\ols{\obeylines} 
\def\op1{\oplus} 

\def \ovr{\over} 

\def\omg{\omega} \def\Omg{\Omega} 
\def\oss{\obeyspaces} 
\def\pint{\parindent} 
\def\prd{\prod} \def\pt1{\partial} 
\def\prp{\propto} 

\def\qiv{\equiv} 
\def\rar{\rightarrow} 
\def\rng{\rangle} 

\def\sgm{\sigma} \def\Sgm{\Sigma} 
\def\stt{\hbox{ s.t. }} 
\def\sub{\subset} 

\def \tms{\times} 

\def\tta{\theta} \def\Tta{\Theta} 
\def\vep{\varepsilon} 
\def\vph{\varphi} 

\def\vrt{\vert} 

\def\xst{\exists} 

\def\q{\quad} \def\qq{\qquad} 

\def\lf{\left} \def\rt{\right} 

\def\Abs{\mathop{\rm abs}\nolimits} 
\def\angle{\mathop{\rm angle}\nolimits} 
\def\arc{\mathop{\rm arc}\nolimits} 
\def\cosec{\mathop{\rm cosec}\nolimits} 
\def\D{{\rm d}} 

\def\Div{\mathop{\rm div}\nolimits} 
\def\E{\mathop{\rm E}\nolimits} 
\def\Grad{\mathop{\rm grad}\nolimits} 
\def\Kur{\mathop{\cal K}\nolimits} 
\def\Min{\mathop{\rm min}\nolimits} 
\def\Max{\mathop{\rm max}\nolimits} 
\def\mod{\mathop{\rm mod}\nolimits} 
\def\Mom{\mathop{\cal M}\nolimits} 
\def\Med{\mathop{\rm med}\nolimits} \let\med=\Med 
\def\Mad{\mathop{\rm mad}\nolimits} \let\mad=\Mad 
\def\Neb{\mathop{\aleph}\nolimits} 
\def\Nor{\mathop{{\cal N}*c_v}\nolimits} 
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814 \def\Oc{\mathop{\rm 0}\nolimits} 

815 \def\Per{\mathop{\cal P}\nolimits} 

816 \def\R1{\mathop{\rm Re}\nolimits} 

817 \def\sgn{\mathop{\rm sgn}\nolimits} 

818 \def\Vet{\mathop{\cal V}\nolimits} 

gi9 \def\centre{\centerline} 

820 \def\haln{\halign} 

821 \def \ovln{\overline} 

822 \def\lline{\leftline} 

823 \def\mspn{\multispan} 

824 \def\pshp{\parshape} 

825 \def\rline{\rightline} 

826 \def\sskp{\smallskip} 

827 Ader \nsel raieatpe hoax (¢/9)\kera-6 Tor \ceed 
828 \def\proof{\noindent{\bf Proof.:} } 

329 \def\endprf{\hfill$\sqr$} 

830 \def\qedprf{\par\hfill{q.e.d.}}} 

831 \def\nihongo{\def\kanji(##1) [##2]{\setbox1=\hbox{##1} \dtmp=\wd1 
832 \setbox2=\vbox{\hsize=\dtmp\noindent \sevenrm—-\hfil##2\hfil--} 
833 \hbox{}\kern-1em$\mathrel {\mathop{\kern\z@\copy1}\limits_{\sevenrm\kern.5em\raise .5em\copy2}}$} 
834 \def\radcal (##1) [##2]{\setbox1=\hbox{##1} \dtmp=\wd1 
835 \setbox2=\vbox{\hsize=\dtmp\noindent \sevenbf--\hfil##2\hfil--} 
836 \hbox{}\kern-1em$\mathrel {\mathop{\kern\z@\copy1}\limits_{\sevenrm\kern.5em\raise .5em\copy2}}$} 
837 \def\Ou.{\=0} \def\ou.{\=o} 

838 \def\Uu.{\=U} \def\uu. {\=u} 

339 ©\def\Arak. {\kanji(Ara) [k]} 

340 \def\Hiroshis.{\kanji(Hiroshi) [s]} 

841 \def\kawa.{\radcal(kawa) [b]} \def\Kawa.{\radcal (Kawa) [b]} 
342 \def\Suzug. {\kanji(Suzu) [g]} 

843 

844 \def\norge{\def \aA{\accent23a} 

845 \def\axx.{\aA } \def\Axx.{\AA } 

846 \def\oz.{\’o} \def\0z.{\’0} 

847 \chardef\o0="1C 

848 \def\ozz.{\o0 } \def\O0zz.{\0 }} 

849 \def\pali{\def\aa.{\=a} \def\Aa. {\=A} 

850 \def\ii.{\=\i} \def\Ii.{\=I} 

851 \def\uu.{\=u} \def\Uu. {\=U} 

852 \def\dq.{\d d} \def\Dq.{\d D} 

853 \def\dqh. {\d dh} \def\Dgh.{\d Dh} 

854 \def\tq.{\d t} \def\Tq.{\d T} 

855 \def\tqh.{\d th} \def\Tqh.{\d Th} 

856 \def\nq.{\d n} \def\Nq.{\d N} 

857 \def\nl.{\~n} \def\N1.{\7N} 

858 \def\nx.{\.n} \def\Nx.{\.N}} 

859 \def\physics{\def\unt [##1]{$\rm ##1$} 

860 } 

861 \def\polish{\def\aj.{\c a} \def\Aj.{\c A} 
862 \def\cz.{\’c} \def\Cz.{\’C} 

863 \def\ej.{\c e} \def\Ej.{\c E} 

864. \def\lz.{\’1} \def\Lz.{\’L} 

865 \def\lzz.{\l } \def\Lzz.{\L } 

866 \def\nz.{\’n} \def\Nz.{\’N} 

867 \def\oz.{\’o} \def\0z.{\’0} 

868 \def\sz.{\’s} \def\Sz.{\’S} 

869 \def\zz.{\’z} \def\Zz.{\’Z} 

870 \def\zx.{\.z} \def\Zx.{\.Z} 

871 \def\dzz.{d\’z} \def\Dzz.{D\’z} 

872 \def\dzx.{d\.z} \def\Dzx.{D\.z}} 

873 \def\russian{\def\iv.{\v\i} \def\Iv.{\v I} % 
874 \def\ee.{\"e} \def\Ee.{\"E}} 

875 \def\sanskrit{\def\aa.{\=a} \def\Aa.{\=A} 
876 \def\ii.{\=\i} \def\Ii.{\=I} 

877 \def\uu. {\=u} \def\Uu. {\=U} 

878 \def\dq.{\d d} \def\Dq.{\d D} 

879 \def\dqh. {\d dh} \def\Dgh.{\d Dh} 

880 \def\tq.{\d t} \def\Tq.{\d T} 

881 \def\tqh.{\d th} \def\Tqh.{\d Th} 

ss2. \def\nx.{\.n} \def\Nx.{\.N} 

883 \def\nl.{\~n} \def\N1.{\7N} 

884 \def\rq.{\d r} \def\Rq.{\d R} 

885 \def\rgh.{\d rh} \def\Rqh.{\d Rh} 

886 \def\1lqq.{\d 1} \def\Lq.{\d L} 

887 \def\mq. {\d m} \def\Mq.{\d M} 

888 \def\hq.{\d h} \def\Hq.{\d H} 

ss9 \def\sz.{\’s} \def\Sz.{\’S} 

890 \def\sq.{\d s} \def\Sq.{\d S}} 

891 \def\serbo{\def\cv.{\v c} \def\Cv.{\v C} 

g92.  \def\cz.{\’c} \def\Cz.{\’C} 

893 \def\dz.{\’d} \def\Dz.{\’D} 

894. \def\dzv.{d\v z} \def\Dzv.{D\v z} 

895 \def\sv.{\v s} \def\Sv.{\v S} 
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896 \def\zv.{\v z} \def\Zv.{\v Z}} 

897 \def\slovak{\def\az.{\’a} \def\Az.{\’ A} 

sos. \def\iz.{\’\i} \def\Iz.{\’ I} 

899 \def\yz.{\’y} \def\Yz.{\’Y} 

900 \def\oz.{\’o} \def\0z.{\’0} 

901 \def\uz.{\’u} \def\Uz.{\’U} 

902 \def\ae.{\"a} \def\se.{\"A} 

903 \def\oy.{\*o} \def\Oy. {\70} 

904 \def\rz.{\’r} \def\Rz.{\’R} 

905 \def\lz.{\’?1} \def\Lz.{\’L} 

906 \def\cv.{\v c} \def\Cv.{\v C} 

907 \def\sv.{\v s} \def\Sv.{\v S} 

908 \def\zv.{\v z} \def\Zv.{\v Z} 

909 \def\dzv.{d\v z} \def\Dzv.{D\v z} 

910 \def\dv.{\v d} \def\Dv.{\v D} 

911 \def\tv.{\v t} \def\Tv.{\v T} 

912 \def\nv.{\v n} \def\Nv.{\v N} 

913 \def\lv.{\v 1} \def\Lv.{\v L}} 

914 \def\tex{\long\def\veb##1{\def \next {##1}{\tt \frenchspacing\expandafter\strip\meaning\next }} 

915 \def\strip##1>{} 

916 \def\bx{{\it bx}} %, TeX book 

917 \def\kx{{\it kx}} % KiteX 

918 \def\mx{{\it mx}} %, manmac 

919 \def\plx{{\it plx}} 4% plain TeX 

920 \def\px{{\it px}} 4 primitive TeX 

921 } 

922 \def \vietnamese{\def\dt.{d\kern-.5em\raise.25em\hbox{--}} 

923 \def\Dt.{{D\kern-.75em\raise.1em\hbox{--}\kern. 25em}} 

924 \def\ap.{\u a} \def\Ap.{\u A} 

925 \def\ay.{\"a} \def\Ay.{\7A} 

926 \def\ey.{\*e} \def\Ey.{\*E} 

927 \def\oy.{\*o} \def\Oy. {\70} 

928 \def\az.{\’a} \def\Az.{\’ A} 

929 \def\as.{a\kern-.5em\raise.4em\hbox{?}} \def\As.{{A\kern-.6em\raise.59em\hbox{?}\kern. 1em}} 

930 \def\al.{\~a} \def\Al.{\~A} 

931 \def\aq.{\d a} \def\Aq.{\d A} 

932 \def\ez.{\’e} \def\Ez.{\’E} 

933 \def\eh.{\‘e} \def\Eh.{\‘E} 

934 \def\es.{e\kern-.5em\raise.39em\hbox{?}} \def\Es. {E\kern-.5em\raise.62em\hbox{?}} 

935 \def\el.{\~e} \def\E1.{\"E} 

936 \def\eq.{\d e} \def\Eq.{\d E}} 

937 \def\zhongwen{\def\af.{\=a} \def\az.{\’a} \def\av.{\v a} \def\ah.{\‘a} 

938 \def\if.{\=\i} \def\iz.{\’\i} \def\iv.{\v\i} \def\ih. {\‘\i} 

939 \def\of.{\=o} \def\oz.{\’o} \def\ov.{\v o} \def\oh.{\‘o} 

940 \def\ouf.{\=ou} \def\ouz.{\’? ou} \def\ouv.{\v ou} \def\ouh. {\‘ou} 

941 \def\uf.{\=u} \def\uz.{\’u} \def\uv.{\v u} \def\uh. {\‘u} 

942 \def\uof.{u\=o} \def\uoz.{u\’o} \def\uov.{u\v o} \def\uoh. {u\‘o} 

943 \def\put ji(##1) [##2] {\begingroup\setbox1=\hbox{##1} \dtmp=\wd1 

944 \setbox2=\vbox{\hsize=\dtmp\noindent \sevenrm—-\hfil##2\hfil--} 

945 \hbox{}\kern-1em$\mathrel {\mathop{\kern\z@\copy1}\limits_{\sevenrm\kern.5em\raise .5em\copy2}}$\endgroup} 

946 \def\putbs (##1) {\begingroup\setbox1=\hbox{##1} \dtmp=\wd1 

947 \setbox2=\vbox{\hsize=\dtmp\noindent\sevenrm$\cdot$\hfil} \hbox{}\kern-1em 

948 $\mathrel{\mathop{\kern\z@\copy1}\limits_{\sevenrm\kern.5em\raise.7em\copy2}}$\lineskip- .5em\endgroup} 

949 \def\aifc.{\putji(\=ai) [c]} \def\Aifc.{\putji(\=Ai) [c]} \def\aifcem.{{\it grief or sorrow}} 

950 \def\baofc.{\putji(b\=ao) [c]} \def\Baofc.{\putji(B\=ao) [c]} \def\baofcm.{{\it praise or 
commend}} 

951 \def\biaovc. {\putji(bi\v ao) [c]} \def\Biaovc. {\putji(Bi\v ao) [c]} \def\biaovem.{{\it surface}} 

952 bee nnacet pease tey es) ieT} \def\Caizc.{\putji(C\’ai) [c]} \def\caizem.{{\it cut paper 
or cloth 

953 \def\chazng.{\putbs(ch\’ang)} \def\Chazng. {\putbs (Ch\’ ang) } 

954 \def\daihc.{\putji(d\‘ai) [c]} \def\Daihc.{\putji(D\‘ai) [c]} \def\daihcem.{{\it a sack or 


955 \def\gofng.{\putbs(g\=ong)} \def\Gofng. {\putbs (G\=ong) } 
956 Race Guo coe uti (pane o) [c]} \def\Guove. {\putji(Gu\v o) [c]} \def\guovem.{{\it wrap or 
} 


957 \def\live. {\putji(1\v\i) [c]} \def\Live. {\putji(L\v\i) [c]} \def\livem.{{\it lining or inside}} 

958 \def\lozng.{\putbs(1\’ong)} \def\Lozng.{\putbs (L\’ ong) } 

959 \def\mizngry.{\putji(m\’\i ng) [ry]} \def\Mizngry.{\putji(M\’\i ng) [ry]} 

960 \def\niaovc.{\putji(ni\v a0) tel} \def\Niaovc.{\putji(Ni\v ao) [c]} \def\niaovem.{{\it slender 
and delicate} 

961 \def\qiuzc.{\putji(qi\’u) [c]} \def\Qiuzc.{\putji(Qi\’u) [c]} \def\qiuzem.{{\it fur coat}} 

962 \def\rih.{\putbs(r\‘\i)} \def\Rih. {\putbs(R\‘\i)} \def\rihm.{{\it the Sun}} 

963 \def\shuaifc.{\putji(shu\=ai) [c]} \def\Shuaifc.{\putji(Shu\=ai) [c]} \def\shuaifem.{{\it 
decline}} 

964 \def\xiafngc.{\putji(xi\=ang) [c]} \def\Xiafngc.{\putji(Xi\=ang) [c]} \def\xiafngem.{{\it 
assist}} 

965 \def\xiehc. {\putji(xi\‘e) [c]} \def\Xiehc. {\putji(Xi\‘e) [c]} \def\xiehcm.{{\it blaspheme}} 

966 \def\xizc. {\putji(x\’\i) [c]} \def\Xize.{\putji(X\’\i) [c]} \def\xizem.{{\it raid}} 

967 \def\yif.{\putbs(y\=\i)} \def\Yif.{\putbs(Y\=\i)} \def\yifm.{{\it clothes}} 

968 \def\yihc. {\putji(y\‘\i) [c]} \def\Yihe.{\putji(Y\‘\i) [c]} \def\yihem.{{\it descendants}} 

969 \def\yueh. {\putbs(yu\‘e)} \def\Yueh.{\putbs (Yu\‘e)} \def\yuehm.{{\it the moon}} 

970 \def\zhafngg.{\put ji(zh\=ang) [g]} \def\Zhafngg. {\put ji(Zh\=ang) [g]} 
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971 \def\zhihc.{\putji(zh\‘\i) [c]} \def\Zhihc. {\putji(Zh\‘\i) [c]} \def\zhihem.{{\it control, 
make, or system}} 

972 \def\zhofngc. {\put ji(zh\=ong) [c]} \def\Zhofngc. {\put ji(Zh\=ong) [c]} \def\zhofngem.{{\it 
inner feelings}} 

973 \def\zhuafngc. {\putji(zhu\=ang) [c]} \def\Zhuafngc. {\putji(Zhu\=ang) [c]} \def\zhuafngem. {{\it 
clothing}} 

974 } 


§ A.13 Degenerate test and other programs 


% degen.m 
Dim=40; Xbunch=(0:2:Dim)’; Ycore=ones(size(Xbunch)); X=[]; Y=0; 
for j=0:2:Din, 
X=[X;Xbunch]; Y=[Y; (j*Ycore)]; 
end 
a aac Tri=delaunay(X,Y); NumTri=size(Tri,1); [XHex,YHex]=voronoi(X,Y) ; 
%, honey .m 
Sq3eeqrt (3) ; Dim=40; Shift=1; y=1:5q3:10; X=[]; Y=; 
Xinit=0; Xbunch=(Shift:6:Dim)’; Ycore=ones(size(Xbunch)) ; 
10 for j=0:(2*Sq3) :Dim, 
11 X=[X;Xbunch]; Y=[Y;j*Ycore]; 
12 end 
13 Xinit=3; Xbunch=(3:6:Dim)’; Ycore=ones (size (Xbunch) ) ; 
14 for j=Sq3: (2*Sq3) :Dim, 
15 X=[X;Xbunch]; Y=[Y;j*Ycore]; 
16 end 
17 Tri=delaunay(X,Y); NumTri=size(Tri,1); [XHex,YHex]=voronoi (X,Y) ; 
18 % cover.m 
19 Sq3=sqrt (3); Dim=40; y=1:Sq3:10; X=[]; Y=[]; Xinit=0; 
20 Xbunch=(0:6:Dim)’; Ycore=ones (size (Xbunch) ) ; 
21 for j=0:(2*Sq3) :Dim, 
22 X=[X;Xbunch]; Y=[Y;j*Ycore]; 
23 end 
24 Xinit=3; Xbunch=(3:6:Dim)’; Ycore=ones(size(Xbunch)) ; 
25 for j=Sq3: (2*Sq3):Dim, 
26 X=[X;Xbunch]; Y=[Y;j*Ycore]; 
27 end 
28 [XHex,YHex]=voronoi(X,Y); NumE=size(XHex,2); NeighE=sparse (NumE ,NumE) ; 
29 for i=1:(NumE-1), 
30 for j=(it1) :NumE, 
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31 if (((XHex(1,i)==XHex(1,j)) & (YHex(1,i)==YHex(1,j))) | 
32 ((XHex(1,i)==XHex(2,j)) & (YHex(1,i)==YHex(2,j))) | . 
33 ((XHex(2,i)==XHex(1,j)) & (YHex(2,i)==YHex(1,j))) | 
34 ( (XHex(2,i)==XHex(2,j)) & eer i)==YHex(2,j)))) 

35 NeighE (i, jai; NeighE(j,i)=1 

36 end 

37 end 

38 end 


39 % covers.m 

40 Xmid=[]; Ymid=[]; 

41 for i=1:NunE, 

42 Xmid=[Xmid; ( (XHex (1,i)+XHex(2,i))/2)]; Ymid=[Ymid; ((YHex(1,i)+YHex(2,i))/2)]; 
43 end 

44 [1I,J]=find(tril(NeighE)); NumV=size(I,1); Xcov=[]; Ycov=[]; 

45 for i=1:NunV, 

46 Xcov=([Xcov; [Xmid(I(i,1) ,1) ,Xmid(J(i,1),1)]]; Ycov=[Ycov; [Ymid(I(i,1),1),Ymid(J(i,1),1)]]; 
47 end 

48 Xcovt=Xcov’; Ycovt=Ycov’; NumE1=size(Xcov,1); NeighE1=sparse (NumE1 ,NumE1) ; 

49 for i=1:(NumE1-1), 

50 for j=(it+1) :NumE1, 


51 if (((Xcovt(1,i) ’==Xcovt(1,j)’) & (Ycovt(1,i)’==Ycovt(1,j)’)) | 
52 ((Xcovt (1,1) ?==Xcovt(2,j)’) & (Ycovt (1,4) ?= =Ycovt(2,j)’)) | . 
53 ((Xcovt(2,i)’?==Kcovt(1,j)’) & (Ycovt(2,i)’==Ycovt(1,j)’)) | 
54 ((Xcovt (2,1) ’?==Kcovt(2,j)’) & (Ycovt(2,i)’==Ycovt (2,j)’))) 

55 NeighE1(i,j)=1; NeighE1(j,i)=1; 

56 end 

57 end 

58 end 


59 Xmid=[]; Ymid=[]; 

60 for i=1:NumEi, 

61 Xmid=[Xmid; ((Xcovt (1,1) ’+Xcovt (2,i)’)/2)]; Ymid=[Ymid; ((Ycovt(1,i) ’+Ycovt(2,i)’)/2)]; 
62 end 

63 [I,J]=find(tril(NeighE1)); NumV=size(I,1); Xc1=[]; Yc1=01; 

64 for i=1:NunV, 

65 Xc1=[Xe1; [Xmid(I(i,1),1) ,Xmid(J(i,1),1)]]; Yeit=[Yc1; [Ymid(I(i,1),1),Ymid(J(i,1),1)]]; 
66 end 

67 % coverss.mXcit=Xcl’; Ycit=Ycl’; 

68 NumE2=size(Xc1,1); NeighE2=sparse (NumE2, NumE2) ; 

69 for i=1:(NumE2-1), 

70 for j=(it1) :NumE2, 
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71 if (((Xcit(1,i)’==Xeit(1,j)’) & (Yeit(1,i)’==Yeit(1,j)’)) | 
72 ((Xe1t (1,4) ?==Xe1t(2,j)?) & (Yeit(1,i)’==Yceit(2,j)’)) | . 
73 ((Xe1t (2,1) ’==Xeit(1,j)’) & (Ycit(2,1i)’==Ycit(1,j)’)) | 
74 ((Xe1t (2,1) ?==Xe1t(2,j)?) & (Yeit(2,1i)’==Yc1t(2,j)’))) 

75 NeighE2(i,j)=1; NeighE2(j,i)=1; 

76 end 

a7 end 

78 end 


79 Xmid=[]; Ymid=[]; 

80 for i=1:NumE2, 

81 Xmid=[Xmid; ((Xcit (1,1) ?+Xc1t(2,i)’?)/2)]; Ymid=[Ymid; ((Y¥cit(1,1i)’?+Ycit(2,i)’)/2)]; 
82 end 

83 [1I,J]=find(tril(NeighE2)); NumV=size(I,1); Xc2=[]; Yc2=[]; 

84 for i=1:NunV, 

85 Xc2=[Xc2; [Xmid(I(i,1),1) ,Xmid(J(i,1),1)]]; Yc2=[Yc2; [Ymid(I(i,1),1),Ymid(J(i,1) ,1)]]; 
86 end 

87 % crop.m by K N J Tiyapan, 15 July 2001 

88 clear all; format long g; format compact; NumCel1=1000; rand(’state’ ,sum(100*clock)); 
s9 [XVoro,YVoro]=voronoi(X,Y); SizeV=size(XVoro,2); Xv=[—]; Yv=0; 

90 for j=1:SizeV, 

91 if ((((XVoro(1,j)>0) & (XVoro0(1,j)<1)) & ((¥Voro(1,j)>0) & (YVoro(1,j)<1))) | 

92 (C(XVor0(2,j)>0) & (XVoro(2,j)<1)) & ((YVor0(2,j)>0) & (YVoro(2,j)<1)))) 


93 Xv=[Xv,XVoro(:,j)]; Yv=[¥v,YVoro(: ,j)]; 
94 end 
95 end 


§ A.14 Face statistics in n dimensions 


4 statsgenn.m by K N J Tiyapan, ist July, 2001 
echo off; clear all; format short g; more off; 
pti =fopen(’./v50.dat’,’r’); scl =fscanf(pti, ’4d’, 4); 
Dimension=sc1(1,1); NumVAl11 =sci(2,1); NumC =sc1i(3,1); 
sc2 =fscanf(pti, *4%f’, [Dimension, NumVAl1]); VerticeAll =sc2’; 
CVMat =sparse(NumC, NumVAl1); CFrame =ones(NumC, 1); VCFrame=zeros(NumVA11,1); 
VFrame=ones (NumVA11, 1); 
for i=1:NunC, 
scl =fscanf(pti, ’%d’, 1); 
10 for j=t:sci, 
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11 sc2 =fscanf(pti, ’4d’, 1); Num =sc2+1; CVMat(i,Num) =1; 
12 if ( max(abs(VerticeAll(Num, :))) > 0.5 ) 

13 CFrame(i,1) =0; VFrame(Num,1)=0; 

14 end 

15 end 

16 end 


17 fclose(pt1) ; 

18 for i=1:NumC, 

19 ViInC=find(CVMat(i,:)’); NumVInC=size(VInC, 1); 
20 if (CFrame (i,1)==1) 


21 for j=1:NunVInc, 

22 VCFrame (VInC(j,1),1)=1; 
23 end 

24 end 

25 end 


26 CVNiceCMat=[]; 
27 for i=1:NunC, 
28 if (CFrame (i,1)==1) 


29 CVNiceCMat=[CVNiceCMat ;CVMat (i,:)]; 
30 end 
31 end 


32 CNumVNiceCMat=sum(CVNiceCMat,2); NumV=sum(VCFrame) ; 

33 VVCFrameMat=zeros(NumV,2); Vertice=zeros(NumV,Dimension); Count=0; 
34 for i=1:NumVAll, 

35 if (VCFrame (i,1)==1) 


36 Count=Count+1; 

37 VVCFrameMat (Count ,1)=i; VVCFrameMat (Count ,2)=Count; 
38 Vertice (Count,:)=VerticeAll(i,:); 

39 end 

40 end 


41 pt3=fopen(’./n50.dat’,’w’); pt2=fopen(’./c50.dat’,’r’); line=fget1(pt2) ; 

42 sci =fscanf(pt2, ’%d’, 1); sc2=fscanf(pt2,’%f’, [Dimension,NumC]); Cell=sc2’; 

43 fclose(pt2); CNeighCCMat=sparse(NumC, NumC); t=cputime; FVAl11Mat=[]; FNumVAl1Mat=[]; 
44 for i=1:(NumC-1), 

45 for j=(it1) :NunC, 


46 VShared=and(CVMat(i,:), CVMat(j,:)); NumShared =sum(VShared, 2); 
47 NumFVA11Mat=size (FVA11Mat, 1); 

48 if (NumShared >= Dimension) 

49 CNeighCCMat (i,j) =1; CNeighCCMat(j,i) =1; Exist=0; 

50 for k=1:NumFVA11Mat, 

51 MatchExistingFV=sum(and(VShared,FVA11Mat(k,:)) ,2); 


52 if (Mat chExistingFV>=Dimension) 


